Anweisung für ALLE sheets
Franz
ich hab folgende Anweisung, die auch funktioniert:
Private Sub Workbook_Open()
With ActiveSheet.PageSetup
.PaperSize = xlPaperA4
End With
End Sub
Das hätte ich beim Start gerne für alle Blätter der Datei. Wie muss ich das bitte schreiben:
For each worksheets in workbook.worksheets ......... ?
Danke schonmal und Grüße
Franz
Anzeige