ich moechte gerne landscape format drucken. Habe bereits diese Makro erstellt:
Private Sub CommandButton1_Click()
ActiveSheet.PageSetup.PrintArea = "$A$1:$H$88"
Application.Dialogs(xlDialogPrint).Show
End Sub
Jetzt weiss ich aber nicht weiter...
Matthias