Hallo Philip Philip Sing schrieb:
ich suche nach einer Möglichkeit (einem Makro), mit dem eine Writerdatei beim Speichern automatisch unter dem Namen VorlagenName_DatumZeit.odt gespeichert wird. Hat jemand sowas parat oder eine Quelle?
Ich hab hier ein Makro das eine Calc-datei mit dem Inhalt einer Zelle benamt, den Befehl 'now' für den Datum+Zeit Stempel hab ich an passender Stelle schon eingefügt, leider weiss ich nicht wie ich an den Vorlagennamen eines Writerdatei rankomme, vielleicht kann jemand anderes die notwendigen Änderungen erstellen.
Gruß Werner Sub untera1speichern dim dummy() myDoc = thisComponent mySheet = myDoc.sheets(0) mycell = mysheet.getCellByPosition(0,0) 'Lese der Werte myString=mycell.string datei="pfad/zum/Verzeichniss/"& myString & " " & now & ".ods" dateiurl=converttourl(datei) odoc=thisComponent odoc.storeasurl(dateiurl,dummy()) rem oder rem odoc.storetourl(dateiurl,dummy()) End Sub --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
