So legen sie den druckbereich mit vba fest (mit beispielen)
Sie können in VBA die folgende Syntax verwenden, um den Druckbereich festzulegen und eine Druckvorschau anzuzeigen, bevor Sie tatsächlich ein Blatt drucken:
Sub SetPrintArea()
With Sheets("Sheet1")
.PageSetup.PrintArea = Selection.Address
.PrintPreview
End With
End Sub
Dieses spezielle Makro legt den Druckbereich auf den aktuell ausgewählten Zellbereich im Blatt namens „Blatt1“ fest und stellt dann eine Druckvorschau bereit.
Hinweis : Wenn Sie den ausgewählten Bereich ohne Vorschau drucken möchten, ersetzen Sie im Makro .PrintPreview durch .PrintOut .
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: So legen Sie den Druckbereich mit VBA fest
Angenommen, wir haben in Excel das folgende Blatt mit Daten zu verschiedenen Basketballspielern:
Wir können das folgende Makro erstellen, um einen Druckbereich festzulegen und eine Druckvorschau anzuzeigen, bevor wir tatsächlich ein Blatt drucken:
Sub SetPrintArea()
With Sheets("Sheet1")
.PageSetup.PrintArea = Selection.Address
.PrintPreview
End With
End Sub
Angenommen, wir wählen als nächstes den Zellbereich A2:B7 aus:
Wenn wir dieses Makro ausführen, wird der Druckbereich automatisch auf diesen ausgewählten Zellbereich eingestellt und das folgende Druckvorschaufenster erscheint:
Dies zeigt uns genau, wie die Seite aussehen wird, wenn wir den aktuell ausgewählten Zellbereich drucken.
Wenn wir den ausgewählten Zellbereich ändern, ändert sich automatisch der Druckbereich.
Angenommen, wir wählen stattdessen den Bereich A1:B11 aus:
Wenn wir dieses Makro erneut ausführen, wird der Druckbereich automatisch auf diesen ausgewählten Zellbereich eingestellt und das folgende Druckvorschaufenster erscheint:
Die Druckvorschau zeigt nun, dass wir den Bereich A1:B11 drucken, wenn wir mit dem Drucken fortfahren.
Hinweis : Die vollständige Dokumentation zur PrintArea -Eigenschaft in VBA finden Sie hier .
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
VBA: So drucken Sie als PDF
VBA: So verwenden Sie die Druckvorschau
VBA: So erstellen Sie Ordner