Drucken-Dialogfenster per Excel-Makro aufrufen und Seitenzahlen einstellen
Das Drucken einer Excel-Arbeitsmappe oder Tabelle ist einfach. Wenn Sie allerdings aus einem Makro heraus drucken möchten, ist es schwierig, alle Optionen nachzubilden.
Das müssen Sie auch gar nicht. Sie können das Drucken-Dialogfenster aus einem Excel-Makro heraus aufrufen und dabei auch bestimmte Optionen voreinstellen. Das folgende VBA-Makro zeigt, wie das geht:
Sub StelleDruckseitenEin()
Const Start As Integer = 3
Const Ende As Integer = 5
Application.Dialogs(xlDialogPrint).Show arg1:=2, _
arg2:=Start, arg3:=Ende
End Sub
Mit dem Makro rufen Sie das Dialogfenster DRUCKEN auf. Dabei werden die Druckoptionen so eingestellt, dass Sie nicht die gesamte Tabelle ausdrucken, sondern nur die Druckseiten 3 bis 5. Die folgende Abbildung zeigt, wie das Ergebnis aussieht:
Im Makro wird die Festlegung der Druckseiten über die beiden Konstanten START und ENDE gesteuert. Legen Sie über diese Zahlen fest, mit welcher Seite der Ausdruck starten und enden soll.