Seite 1 von 1

OpenOffice Makro programmieren.

Verfasst: Di, 20.01.2004 12:47
von Jolanda
Hallo NGs,
Bin der absolute Anfäger bei OOO und benötige unbedingt eure Hilfe.
Mein Problem:

Ich erhalte regelmäßig eine Email mit einer *.xls Datei im Anhang. Diesen Anhang möchte ich mit OOO öffnen. Das klappt auch.
Diese ExcelDatei enthält 6 Arbeitsmappen. Für jeden Wochentag außer Sonntags eine. Jetzt möchte ich per Makro immer die aktuelle Arbeitsmappe öffnen. Also am Montag Arbeitsmappe "Montag"... Hat jemand von euch vielleicht ne Ahnung, wie ich das hinkriege? Das was ich meine, was funktionieren könnte ist folgender Code:

Sub oeffne_sheet()
Dim ODocument As Object, oSheets As Object
Dim oSheet As Object

ODocument = ThisComponent
oSheets = ODocument.Sheets
oSheet = oSheets.getByName("Dienstag")
End Sub

Der Zeigt die Arbeitsmappe jedoch nicht an.
Danke für eure Hilfe
Jolanda :( :(

Verfasst: Mi, 21.01.2004 09:33
von Toxitom
Hallo Jolanda,

der Weg, den du gehst, ist schon recht gut. Den Begriff Dienstag kannst du dir aus de aktuellen Datum extrahieren und umwandeln.

Damit deine Tabelle angezeigt wird, kannst du zum Beispiel eine Zelle markieren im gewünschten Tabellenblatt.

Codebeispiel:

Code: Alles auswählen

sub oeffne_sheet
     oDoc=thisComponent
     oSheet=oDoc.sheets.getbyName("dienstag")
     oCell=oSheet.getCellRangeByName("a1")
     oDoc.CurrentController.select(oCell)    
end sub
Hoffe es hilft erst mal weiter.

Gruss Thomas

Verfasst: Mi, 21.01.2004 10:03
von Jolanda
Danke für die Hilfe!!
By Jolanda