Hi,
momentan versuche ich mich an Makros und schaffe es bereits mein Dokument in einen vorher eingegebenen Pfad zu exportieren. (mittels DispatchHelper, ExportDirectToPDF usw.)
Ich möchte allerdings erreichen, dass immer in einem Untervezeichnis des Dokumentenstandorts gespeichert wird. Wie komme ich an diesen “CurrentLocation”-Pfad?
LG
Die Frage ist auch nochmal auf English gestellt, da ich nicht wusste wie aktiv hier auf Deutsch geantwortet wird. Vielen Dank für den Hinweis von Opaque
Wenn Du eine Frage mehrfach stellst, wäre es nett, das auch zu erwähnen um Mehrfachaufwand zu vermeiden (Basic: Current document path)
Oh, da habe ich nicht sehr weit gedacht Tut mir leid
Hallo,
ich lade dazu die Tools Bibliothek (falls sie nicht schon geladen ist)
if (Not GlobalScope.BasicLibraries.isLibraryLoaded("Tools")) then
GlobalScope.BasicLibraries.LoadLibrary("Tools")
end if
und kann dann mit
oDoc = ThisComponent
if oDoc.hasLocation() then
sDocURL = oDoc.getURL()
sDocPath = DirectoryNameoutofPath(sDocURL, "/")
sDocName = GetFileNameWithoutExtension(sDocURL, "/")
sDocExt = GetFileNameExtension(sDocURL, "/")
endif
die verschiedenen Parameter einer Datei abfragen. wobei
dim oDoc as object rem aktuelles Docucment
dim sDocURL as string rem vollständiger URL
dim sDocPath as string rem vollständiger Pfad
dim sDocName as string rem Dateiname ohne Extension
dim sDocExt as string rem Datei Extension (.ods, .odt, etc...)
sind.
Ich hoffe, das hilft.
Danke für die schnelle Hilfe, funktioniert!