Hi. Ich öffne eine Excel-Datei in OpenOffice, da ich gerade kein MS-Excel da habe und OpenOffice scheint das Excel auszukommentieren, so das das Macro nicht mehr funktioniert.

Code:
Rem Attribute VBA_ModuleType=VBADocumentModule
Sub ThisWorkbook
Rem Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Rem For Each Sheet In ThisWorkbook.Sheets
Rem Sheet.PageSetup.LeftFooter = "Last saved: " & Format(Date, "dd-mm-yy") & " " & Time
Rem Next Sheet
Rem End Sub
Rem 
End Sub
Wenn ich die Rems entferne, dann meckert er wegen Syntaxfehlern rum. In MS-Excel hat das alles aber super geklappt. Kann mir vielleicht jemand helfen das in beiden Systemen zum laufen zu bekommen? Wäre Klasse!

EDIT: Das Macro soll beim speichern der Excel-Datei das "Last Modified" neu im Fuss(Seitenansicht/Druck) setzen.