اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اريد ادراج اسم المستند تلقائيا عند الطباعة


asaz

الردود الموصى بها

اواجه مشكلة هي صغيرة لكنها قد تستغرق وقتا وجهدا كبيرين

وهي انه لدي مجموعة من المستندات ولتي فيها نماذج إدارية وغيرها وهي مطبوعة اي تم طباعتها أو انه محفوظة بالجهاز

لكن المشكلى انه عندما اريد ان ابحث عنها اجد صعوبة في معرفة اسم المستند التي هي فيه وهذا ما يستغرق وقتا كثيرا للبحث عنها بالاسم أو بأي عبارة داخل المستند حيث تخرج نتيجة البحث باسماء كثيرة لمستندات داخل الجهاز

فبودي لو امكن بطريقة دنامكية آلية انه عند طباعة اي ورقة من المستند ان ينطبع اسم المستند مها في اسفل الصفحة وبخط صغير حتى اتمكن من معرفة المستند الذي منه هذه المطبوعة

وشكرا لكم

رابط هذا التعليق
شارك

بكل سهولة .. من قائمة عرض اختر رأس وتذييل الصفحة..

ثم اختر أين تريد أن يظهر الاسم في الأعلى أم في الأسفل ،،، يمين أم شمال..

ثم من القائمة التي تظهر لك اضغط على إدراج نص تلقائي ثم اختر اسم الملف.

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاته

ضع هذا الكود في "القالب العمومي" الخاص بوحدات الماكرو

عند النقر على أيكون طباعة من شريط الأدوات

Sub FilePrintDefault()

On Error GoTo ka

If ActiveWindow.View.SplitSpecial <> wdPaneNone Then

ActiveWindow.Panes(2).Close

End If

If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _

ActivePane.View.Type = wdOutlineView Then

ActiveWindow.ActivePane.View.Type = wdPrintView

End If

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

If Selection.HeaderFooter.IsHeader = True Then

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter

Else

ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

End If

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _

"FILENAME ", PreserveFormatting:=True

ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

Application.Run "FilePrint"

ka: End

End Sub

رابط هذا التعليق
شارك

  • 2 weeks later...

ممكن توضح لي اخي اكثر

هل من طريقة الماكرو

من اوامر لم اجد امر الطباعة

وهل يمكن ان يكون ذلك حتى للمستندات السابقة التي تم كتابتها أم انه فقط للمستندات الجديدة ؟

رابط هذا التعليق
شارك

  • 6 months later...

شوف في المستندات الجديدة وباختصار يمكن الذهات إلى :

إدراج > حقل > اسم المستند

طبعاً يجب أن يكون هذا في نفس القالب ليظهر في جميع المستندات الجديدة .

تم تعديل بواسطه عبدالله سليمان
رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information