Batch-Druck mehrerer Auswahlen (alle Druckbereiche) auf einer Seite in Excel

Hier werde ich über das Drucken mehrerer ausgewählter Zeilen auf einer Seite mit VBA in Excel sprechen. Bitte gehen Sie wie folgt vor:

1. Drücken Sie Andere + F11 Tasten gleichzeitig, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.

2 Klicken Insert > Modulund fügen Sie dann den folgenden VBA-Code in das neu öffnende Modulfenster ein.

VBA: Drucken Sie mehrere ausgewählte Zeilen auf einer Seite in Excel

Sub Extract_to_Print()
Dim Rg As Range, Rg1 As Range, Rg2 As Range
Dim xAddress As String
Dim xSht As Worksheet
Dim I As Long
Dim xScreenUpdate As Boolean
Dim xAlert As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select ranges you will print:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
xScreenUpdate = Application.ScreenUpdating
xAlert = Application.DisplayAlerts
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xSht = ThisWorkbook.Worksheets.Add
I = 1
For Each Rg1 In Rg.Areas
Rg1.Copy xSht.Range("A" & I)
I = I + Rg1.Rows.Count
Next
xSht.PrintOut
xSht.Delete
Application.ScreenUpdating = xScreenUpdate
Application.DisplayAlerts = xAlert
End Sub

3. Drücken Sie F5 Taste oder klicken Sie auf Führen Sie Schaltfläche, um diese VBA auszuführen.

4. Nun wird ein Dialogfeld von Kutools für Excel angezeigt. Bitte wählen Sie mehrere Zeilen aus, die Sie drucken möchten, und klicken Sie auf OK Schaltfläche zum Drucken dieser Zeilen.

Note: Halten Sie die Ctrl Mit dieser Taste können Sie mehrere nicht benachbarte Zeilen gleichzeitig auswählen.

Wenn wir diese nicht aufeinanderfolgenden Zeilen kopieren und als aufeinanderfolgenden Bereich in ein anderes Arbeitsblatt einfügen können, können wir sie problemlos auf einer Seite drucken. Diese Methode führt Kutools für Excel ein Bereiche kopieren Dienstprogramm, um damit umzugehen.

1. Erstellen Sie ein neues Arbeitsblatt, wählen Sie als Nächstes die Zeilen aus, die Sie aus Ihrer Tabelle drucken möchten, und klicken Sie auf Kutoolen > Bereiche kopieren.

Note: Halten Sie die Ctrl Mit dieser Taste können Sie mehrere aufeinanderfolgende Zeilen gleichzeitig auswählen.

2. Aktivieren Sie im sich öffnenden Dialogfeld Mehrere Bereiche kopieren das Kontrollkästchen Alle Option und klicken Sie auf Ok .

Note: Das Einschließlich Reihenhöhe Option und Einschließlich Spaltenbreite Mit den Optionen werden die Zeilenhöhen und Spaltenbreiten der ausgewählten Bereiche kopiert und in den Zielbereich eingefügt.

3. Wählen Sie im neu erstellten Arbeitsblatt die Zelle A1 aus und klicken Sie auf OK Taste.

4. Bleiben Sie im Zielarbeitsblatt und klicken Sie auf Kutoolen > Löschen > Leere Zeilen löschen > Im aktiven Blatt.

Anschließend wird ein Dialogfeld angezeigt, in dem angezeigt wird, wie viele Zeilen gelöscht wurden. Mach es einfach zu.

5. Klicken Sie auf die Reichen Sie das (oder Office-Schaltfläche)> Drucken um diese Zeilen zu drucken.

Eigentlich Kutools für Excel-Designs Assistent für Mehrfachauswahl drucken um mehrere Bereiche zusammen in Excel zu drucken.

1 Klicken Unternehmen > Druck > Assistent für Mehrfachauswahl drucken um den Assistenten für die Mehrfachauswahl zu öffnen.

2. Klicken Sie im ersten Assistenten zum Drucken mehrerer Auswahlen auf Speichern Taste im nun erscheinenden Bestätigungsfenster nun wieder los.  Um Zeilen hinzuzufügen, die Sie zusammen drucken möchten, klicken Sie auf Endziel .

Anmerkungen:

(1) Nach dem Klicken auf die Speichern Taste im nun erscheinenden Bestätigungsfenster nun wieder los. können Sie mehrere aufeinanderfolgende Bereiche in einem Arbeitsblatt auswählen, indem Sie die Taste gedrückt halten Ctrl Taste und wählen Sie sie dann einzeln aus;

(2) Entfernen eines Bereichs / einer Zeile aus dem Zu druckende Bereiche Liste, wählen Sie einfach diesen Bereich / diese Zeile und klicken Sie auf Löschen Taste im nun erscheinenden Bestätigungsfenster nun wieder los..

(3) Dieses Dienstprogramm unterstützt nicht das Drucken ganzer Zeilen und Spalten, z. B. der gesamten Zeile von $ 4: $ 4oder ganze Spalte von $ B: $ B..

3. Ausgewählte Zeilen / Bereiche wurden als verknüpfte Bilder in ein neues Arbeitsblatt eingefügt. Klicken Sie weiter Reichen Sie das (oder Office-Schaltfläche)> Drucken um es zu drucken.