كيف تطبع الصفحة الأخيرة فقط من ورقة العمل في إكسيل؟
في كثير من الحالات ، قد تحتاج فقط إلى طباعة الصفحة الأخيرة من ورقة العمل في Excel. كيف يتم إنجازها؟ توفر هذه المقالة حلاً لتحقيق ذلك.
اطبع فقط الصفحة الأخيرة من ورقة العمل برمز VBA
اطبع فقط الصفحة الأخيرة من ورقة العمل برمز VBA
يمكنك تشغيل التعليمات البرمجية لـ VBA التالية لطباعة الصفحة الأخيرة فقط من ورقة العمل في Excel. الرجاء القيام بما يلي.
1. افتح ورقة العمل التي تحتاجها فقط لطباعة الصفحة الأخيرة ، ثم اضغط قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في نافذة ميكروسوفت فيسوال باسيك للتطبيقات ، انقر فوق إدراج > وحدة. ثم انسخ والصق رمز فبا أدناه في نافذة الوحدة النمطية.
كود فبا: اطبع فقط الصفحة الأخيرة من ورقة العمل
Sub PrintLastPage()
Dim xPages As Long
xPages = ActiveSheet.PageSetup.Pages.Count
If xPages > 0 Then ActiveSheet.PrintOut from:=xPages, to:=xPages, preview:=True
End Sub
3. اضغط على F5 المفتاح لتشغيل التعليمات البرمجية ، ثم يتم عرض الصفحة الأخيرة من ورقة العمل الحالية في مربع الحوار معاينة قبل الطباعة. الرجاء النقر فوق طباعة زر لبدء الطباعة. انظر لقطة الشاشة:
أفضل أدوات إنتاجية المكتب
ارفع مهاراتك في برنامج Excel باستخدام Kutools for Excelوتجربة كفاءة لم يسبق لها مثيل. Kutools for Excel يقدم أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
