Makro "MakeDayCopy"

[Jörg]

Hallo, brauche mal wieder einen Rat der Fachleute.
Obiges Makro ist Euch sicher bekannt.
Nachfolgender Code

Code: Alles auswählen

sFileURL = oDok.getURL() & "_" & cDateToISO( Now() )

fügt die Kopie in den Ursprungsordner ein und hängt das Tagesdatum ans Ende.
Meine Fragen sind:
1.Wie kann ich den Zielordner ändern?
2. Wie kann ich zusätzlich zum Datum auch noch die Uhrzeit dranhängen, damit gegebenenfalls mehrere Kopien abgelegt werden können?
Hab bei Dannenhöfer die o.g. Funktion für das Datum gefunden. '"Time" funktioniert nicht.

Ich danke schon mal für die Hilfe!
Gruß Jörg

[clag]

Hallo Jörg,

was meinst du mit

Wie kann ich den Zielordner ändern?

ein Unterverzeichnis dranhängen oder eine ganz anderen Pfad?

[clag]

hallo Jörg,

ändere dein

Code: Alles auswählen

sFileURL = oDok.getURL() & "_" & cDateToISO( Now()

in

Code: Alles auswählen

xFile = "X:\Dein\Wunsch\directory\" & GetFileNameWithoutExtension(oDok.title,) & format(now(),"YYYY-MM-DD-hh'mm'ss") & ".ods"
sFileURL=converttourl( xFile )

dann kannst du dein "X:\Dein\Wunsch\directory\" angeben und den vorhandene Namen mit Datum und Uhrzeit erweitern,
ggf. "odt" falls es ein Writer dokument ist

[Jörg]

Hallo,
@clag
Ja genauso .

Danke Dir.
Gruß
Jörg