Makros löschen
02.12.2003 15:54:46
Jürgen F.
ich brauche eure Hilfe:
Ich schreibe mit folgenden Code das Datum in die Fußzeile:
Private Sub Workbook_Open()
Worksheets("Kalkulation").PageSetup.RightFooter = "Erstellt am " & Date
End Sub
Welchen Code muss ich bei:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
schreiben, damit das obrige Makro gelöscht wird???
Vielen Dank im Voraus + Gruß
Jürgen
Anzeige