Guten Abend,
habe mir dieses kleine Makro zusammengebastelt.
Wenn also in F1 eine 2 steht, soll die Seitenzahl Menge
angezeigt werden.
Also Seite 1 von 2.
Leider steht False drin
Wenn ich die 2 lösche, zeigt die Fußzeile Richtigerweise
nichts an.
Wo es den der Fehler ?
mgruß kurt k
If ActiveSheet.Range("F1") = "2" Then
With ActiveSheet.PageSetup
.CenterFooter = .CenterFooter = "&""Calibri,Standard""&8&P von &N"
End With
Else
With ActiveSheet.PageSetup
.CenterFooter = ""
End With
End If