Seitenanzahl in Kopfzeile
05.02.2003 15:52:40
Ralf
ich möchte die Seitennummer und die Seitenanzahl per
VBA in die Kopfzeile bekommen.
Gerade habe ich im Archiv eine mögliche Lösung
gefunden. Der untenstehende Code soll in ein Standard-
modul eingegeben werden und mit einer Schaltfläche
versehen werden.
StandardModule: basMain
Sub KopfZeile()
With AcitveSheet
.PageSetup.LeftHeader = "Seite &P von &N"
.PrintPreview
End With
End Sub
Nur leider kommt dann immer diese Fehlermeldung:
Fehler beim Kompilieren
Außerhalb einer Prozedur ungültig.
Kann mir jemand helfen ?
Gruß
Ralf