Wie setze ich den Druckbereich auf die letzte Zeile in Excel?

In Excel wird standardmäßig das gesamte Arbeitsblatt bis zur letzten Zeile mit Daten als Druckbereich festgelegt. Aber in diesem Fall möchte ich von Spalte A nach Spalte C bis zur letzten Zeile mit den Daten wie im folgenden Screenshot drucken. Gibt es Möglichkeiten, damit umzugehen?

Stellen Sie den Druckbereich durch Druckauswahl auf die letzte Zeile mit Daten ein

Stellen Sie den Druckbereich auf die letzte Zeile mit Daten von VBA ein

---

Stellen Sie den Druckbereich durch Druckauswahl auf die letzte Zeile mit Daten ein

Um eine Auswahl bis zur letzten Zeile mit Daten zu drucken, können Sie den Druckbereich vor dem Drucken auf die angegebene Auswahl ändern.

1. Halt Ctrl Wählen Sie dann die Spalten aus, die Sie drucken möchten. Siehe Screenshot:

2 Klicken Reichen Sie das > Druckund dann wählen Auswahl drucken von dem Rahmen Sektion. Siehe Screenshot:

---

Stellen Sie den Druckbereich auf die letzte Zeile mit Daten ein

Hier stelle ich einen Makrocode vor, um auch diesen Vorgang auszuführen.

1. Aktivieren Sie das verwendete Blatt und drücken Sie Alt + F11 Schlüssel zum Öffnen Microsoft Visual Basic für Applikationen Fenster, und klicken Sie auf Insert > Modul. Siehe Screenshot.

2. Fügen Sie den folgenden Code in das ein Modul Skript und drücken Sie F5 Schlüssel zum Ausführen.

VBA: Bereich auf letzte Zeile setzen

'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

3. Ein Dialogfeld wird angezeigt, in dem Sie daran erinnert werden, den gewünschten Spaltenbereich auszuwählen. Siehe Screenshot:

4 Klicken OKwurde der Druckbereich eingestellt.