انتقل إلى المحتوى الرئيسي

كيفية تعيين منطقة الطباعة للصف الأخير في إكسيل؟

في Excel ، بشكل افتراضي ، سيعين ورقة العمل بأكملها حتى الصف الأخير مع البيانات كمنطقة طباعة. لكن في هذه الحالة ، أرغب في الطباعة من العمود A إلى العمود C حتى الصف الأخير بالبيانات كما هو موضح أدناه ، هل هناك أي طرق للتعامل معها؟
doc طباعة الصف الأخير 1
doc طباعة الصف الأخير 2

اضبط منطقة الطباعة على الصف الأخير بالبيانات من خلال تحديد الطباعة

قم بتعيين منطقة الطباعة على الصف الأخير بالبيانات بواسطة VBA


اضبط منطقة الطباعة على الصف الأخير بالبيانات من خلال تحديد الطباعة

لطباعة تحديد إلى الصف الأخير بالبيانات ، يمكنك تغيير منطقة الطباعة إلى التحديد المحدد قبل الطباعة.

1. معلق CTRL مفتاح ثم حدد الأعمدة التي تريد طباعتها. انظر لقطة الشاشة:
doc طباعة الصف الأخير 3

2. انقر قم بتقديم > طباعة، ثم اختر تحديد الطباعة من الضبط الجزء. انظر لقطة الشاشة:
doc طباعة الصف الأخير 4


اضبط منطقة الطباعة على الصف الأخير بالبيانات

هنا أقدم رمز ماكرو للقيام بهذه العملية أيضًا.

1. قم بتمكين الورقة التي تستخدمها ، اضغط على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة، وانقر فوق إدراج > وحدة. انظر لقطة الشاشة.
doc طباعة الصف الأخير 5

2. الصق الكود أدناه إلى وحدة النصي والصحافة F5 مفتاح للتشغيل.

فبا: عيّن المنطقة على الصف الأخير

'UpdatebyExtendoffice20170811
    Dim xRg As Range
    Dim xRgLRow As Long
    Dim xRgAddress As String
    On Error Resume Next
    xRgAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a range:", "KuTools For Excel", xRgAddress, , , , , 8)
    xRg.Select
    xRgLRow = xRg.SpecialCells(xlCellTypeLastCell).Row
    xRgAddress = Left(xRg.Address(1, 1), Len(xRg.Address(1, 1)) - 2)
    xRgAddress = xRgAddress & xRgLRow
    ActiveSheet.PageSetup.PrintArea = xRgAddress
End Sub

doc طباعة الصف الأخير 6

3. ينبثق مربع حوار لتذكيرك بتحديد نطاق العمود الذي تريد استخدامه. انظر لقطة الشاشة:
doc طباعة الصف الأخير 7

4. انقر OK، تم تعيين منطقة الطباعة.

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations