Seite 1 von 1
per Vorlage den Speicherpfad bestimmen
Verfasst: Do, 12.08.2010 10:28
von clag
Hallo Leutz,
besteht die Möglichkeit in einer Vorlage einen vom Standard abweichenden Speicherpfad zu bestimmen ?
also zB Dateien die mit der
Vorlage Rechnung erstellt wurden immer in ..\Rechnungen\ ablegen
und mit Vorlage Angebot erstellte immer in ..\Angebote\ ablegen oder so ähnlich
oder kann man das irgendwie anders realisieren ?
Re: per Vorlage den Speicherpfad bestimmen
Verfasst: Do, 12.08.2010 10:52
von hylli
Ich wusste, dass ich einge ähnliche Frage schonmal gelesen habe:
viewtopic.php?f=1&t=27647&p=115062&hili ... ad#p115062
Hylli
Re: per Vorlage den Speicherpfad bestimmen
Verfasst: Do, 12.08.2010 11:06
von komma4
noch 'ne Antwort:
das ist auch schon mitgeliefert
Es wird eine Routine aus der Bibliothek
TOOLS genutzt.
Verzeichnisname und Dateinamen-"
Vorschlag" ggfs. anpassen
Folgendes Makro speichert als ODF-Textdokument... an das
Extras>Anpassen...>Ereignis>Dokument speichern der Vorlage angehängt
Code: Alles auswählen
Sub beimSpeichern
If ThisComponent.hasLocation() Then
Exit Sub
End If
If NOT GlobalScope.BasicLibraries.isLibraryLoaded( "Tools" ) Then
GlobalScope.BasicLibraries.loadLibrary( "Tools" )
End If
oMasterKey = GetRegistryKeyContent("org.openoffice.TypeDetection.Types")
oTypes() = oMasterKey.Types
oUIKey = GetRegistryKeyContent("org.openoffice.Office.UI/FilterClassification/LocalFilters")
aFilterNames(0,0) = oTypes.GetByName( "writer8" ).UIName & " (*.odt)"
aFilterNames(0,1) = "*.odt"
aFilterNames(0,2) = oTypes.GetByName( "writer8" ).Name
' Routine aus TOOLS
StoreDocument( ThisComponent, aFilterNames, "Vorschlag", ConvertToURL( "/zentrale/daten/testdata" )
End Sub
Re: per Vorlage den Speicherpfad bestimmen
Verfasst: Do, 12.08.2010 11:24
von clag
Hallo Ihr
erst einmal danke ich euch beiden, echt super schnell,
das sieht gut aus, denke damit kann ich schon was anfangen, glaube ich jedenfalls
da bei diesen meinen Vorlagen sowieso schon beim speichern ein Makro gestartet wird.
Da muss ich jetzt mal wieder ein bisschen Makro tüfteln.....
wenn ich nicht klar komme, weiß ich ja wo ich fragen kann
edit:
bin damit nun doch ins Basic-Forum
dahin umgezogen