ich habe ein Problem. Ich möchte, daß auf einer mehrseitigen Tabelle auf der ersten Seite keine Seitenzahl erscheint. Wie kann ich das erreichen. Für Antworten vielen Dank. Gruß Andreas
Sub Drucken_mit_ohne_Seitenzahl()
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""
End With
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _
:=True
With ActiveSheet.PageSetup
.CenterFooter = "Seite &P"
End With
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=100, Copies:=1, _
Collate:=True
End Sub