Basic Excel und OpenOffice Macros

[Katsumi]

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.

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.

 

[werkam]

Open Office arbeite wohl nicht mit VBA sondern mit OpenOffice-Basic, da musst Du erst was ändern.Evtl hilft Dir der Link:
http://www.tecchannel.de/pc_mobile/...n_vba_zu_openoffice_basic_teil_2/index13.html