قم بطباعة عدة صفوف غير فارغة دفعة واحدة مع تجاهل الصفوف الفارغة في Excel

ستقدم هذه الطريقة VBA لطباعة الصفوف بسرعة مع البيانات فقط في نطاق محدد في Excel. الرجاء القيام بما يلي:

1. اضغط على قديم + F11 في نفس الوقت لفتح نافذة Microsoft Visual Basic for Applications.

2. انقر إدراج > وحدة، ثم انسخ والصق رمز فبا التالي في نافذة الوحدة النمطية الافتتاحية الجديدة.

فبا: طباعة الصفوف فقط مع البيانات في Excel

Sub PrintSummary()
Dim xRg As Range, xRg1 As Range, xCell As Range
Dim xSht As Worksheet
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the range to print:", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "You can't select multiple selections", , "Kutools for Excel"
Exit Sub
End If
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Set xSht = Worksheets.Add(After:=Sheets(Sheets.Count))
xRg.Copy xSht.Range("A1")
Set xRg1 = xSht.Range("A1").Resize(xRg.Rows.Count, xRg.Columns.Count)
For Each xCell In xRg1.Columns(1).Cells
If Application.WorksheetFunction.CountA(xCell.EntireRow) = 0 Then
xCell.EntireRow.Hidden = True
End If
Next
xSht.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
xSht.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. اضغط على F5 مفتاح أو انقر فوق يجري زر لتشغيل هذا VBA.

4. في مربع حوار فتح Kutools for Excel ، حدد النطاق الذي تريد تجاهل الصفوف الفارغة وطباعة الصفوف التي تحتوي على البيانات فقط ، ثم انقر فوق OK .

ثم يتم طباعة النطاق المحدد على الفور مع تجاهل جميع الصفوف الفارغة فيه.

ملاحظة: هذا VBA لا يدعم تحديدات متعددة للطباعة المجمعة مع تجاهل الصفوف الفارغة.

تقدم هذه الطريقة Kutools for Excel حذف الصفوف الفارغة أداة لحذف جميع الخلايا الفارغة في ورقة العمل النشطة أو النطاق المحدد ، ثم طباعة تلك الصفوف بالبيانات فقط في Excel. الرجاء القيام بما يلي:

1. انتقل إلى ورقة العمل التي ستطبع فيها صفوفًا تحتوي على بيانات فقط ، وانقر كوتولس > حذف > حذف الصفوف الفارغة > في الورقة النشطة. انظر لقطة الشاشة:

ملاحظة: لطباعة الصفوف مع البيانات في نطاق محدد فقط ، يرجى تحديد هذا النطاق أولاً ، ثم النقر فوق كوتولس > حذف > حذف الصفوف الفارغة > في النطاق المحدد.

2. سيظهر مربع حوار Kutools for Excel ويظهر لك عدد الصفوف الفارغة التي تم حذفها. انقر على OK زر لإغلاقه.

والآن سترى تم حذف جميع الصفوف الفارغة من ورقة العمل النشطة / النطاق المحدد. انظر لقطة الشاشة:

3. انقر فوق قم بتقديم (أو زر المكتب)> طباعة لطباعة الصفوف التي تحتوي على بيانات فقط في ورقة العمل النشطة أو النطاق المحدد.

في بعض الأحيان ، قد ترغب في طباعة الخلايا بالبيانات فقط مع تجاهل جميع الخلايا الفارغة في Excel. ستقدم هذه الطريقة Kutools for Excel حدد الخلايا غير الفارغة المرافق و معالج طباعة تحديدات متعددة لطباعة الخلايا التي تحتوي على بيانات فقط في النطاق المحدد في Excel.

1. حدد النطاق الذي ستطبع فيه الخلايا التي تحتوي على البيانات فقط ، وانقر فوق كوتولس > اختار > حدد الخلايا غير الفارغة. انظر لقطة الشاشة:

2. يظهر مربع حوار Kutools for Excel ويظهر لك عدد الخلايا التي تحتوي على بيانات تم تحديدها. انقر على OK زر لإغلاقه.

3. استمر في تحديد هذه الخلايا غير الفارغة ، وانقر فوق مشروع > الطباعة > معالج طباعة تحديدات متعددة. انظر لقطة الشاشة:

4. في مربع الحوار فتح معالج تحديدات متعددة ، سترى جميع الخلايا غير الفارغة المحددة مدرجة في ملف نطاقات للطباعة قائمة ، الرجاء النقر فوق نهاية .

5. الآن يتم نسخ جميع الخلايا غير الفارغة المحددة ولصقها كصور مرتبطة في ورقة عمل جديدة. من فضلك اضغط قم بتقديم (أو زر المكتب)> طباعة لطباعة هذه الخلايا بالبيانات.

اطبع كل صف / خلية في صفحة منفصلة في Excel

إظهار منطقة الطباعة فقط في ورقة عمل في Excel

مناطق الطباعة والتحديد والمصنف بأكمله في Excel