كيف تطبع الصفحات ذات الأرقام الرومانية؟
يمكننا بسهولة إدخال رقم صفحة الأرقام الرومانية في Word ، لكن Excel لا يدعم هذه الميزة للمستخدمين. في بعض الأحيان ، نحتاج إلى طباعة صفحات ورقة العمل بأرقام صفحات بأرقام رومانية ، كيف يمكنك حل هذه المهمة في Excel؟
اطبع صفحات بأرقام رومانية بأرقام صفحات برمز VBA
اطبع صفحات بأرقام رومانية بأرقام صفحات برمز VBA
لا توجد ميزة مضمنة تسمح لك بطباعة الصفحات بأرقام صفحات رقمية ، ولكن يمكنك إنشاء ماكرو للقيام بهذه المهمة. يرجى اتباع الخطوات التالية:
1. افتح ورقة العمل التي تريد طباعتها.
2. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
3. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
رمز فبا: طباعة الصفحات بأرقام الصفحات ذات الأرقام الرومانية
Sub PrintRoman()
'Update 20140924
Dim xCount As Integer
Dim xIndex As Integer
xCount = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For xIndex = 1 To xCount
Application.ActiveSheet.PageSetup.CenterFooter = Application.Roman(xIndex)
Application.ActiveSheet.PrintOut from:=xIndex, To:=xIndex
Next
Application.ActiveSheet.PageSetup.CenterFooter = ""
End Sub
4. ثم اضغط F5 مفتاح لتنفيذ الكود ، وستتم طباعة جميع صفحات ورقة العمل النشطة بأرقام الصفحات ذات الأرقام الرومانية.
مقالات ذات صلة:
كيف تطبع بسرعة الصفحة الأولى من كل ورقة؟
كيفية طباعة الصفحة الحالية بسرعة في Excel؟
كيف تطبع التعليقات بسرعة في Excel؟
كيف تطبع البيانات في منتصف الصفحة؟
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!