Ich bin gerade dabei ein Makro zu schreiben, jedoch bereitet mir eine Stelle Probleme - Ich möchte ein Dokument ganz simpel öffnen.
Der Programmcode stimmt soweit ich erkennen kann, jedoch wird jede Datei die ich damit öffne, ob .adr, .rtf oder .odt, immer in Calc geöffnet.
Das passt mir leider ganz und garnicht, und ich hätte gerne, dass LibreOffice die Dateien im Writer öffnet. Als Standardprogramm ist bei allen dreien der Writer.
Hier der Programmcode zum öffnen:
Code: Alles auswählen
sub openTemplate
Dim Doc As Object
Dim Url As String
Dim Dummy()
Url = "file:///u/" + findCurrentUser + "/test/template.odt"
Doc = StarDesktop.loadComponentFromURL(Url, "_blank", 0, Dummy)
end sub
