InitialFileName
23.01.2008 15:54:42
Micha
ich erstelle gerade eine Vorlage für Excel. Dabei rufe ich eine MessageBox, die zum Speichern auffordert, auf. Danach wird ein Sub gestartet, welches Datum und Projektnamen aus einem Tabellenblatt ausliest. Diese beiden Werte möchte ich als Dateinamen innerhalb GetSaveAsFilename mittels der Eigenschaft InitialFileName festlegen. Das Datum habe ich wie folgt definiert:
Dim datum As Date
...
datum=Worksheets("Name").Range("C7").Value
[...]GetSaveAsFilename(datum.xlsm,[..]
Dummerweise wird das Datum als TT.MM.JJJJ eingefügt, weshalb die Datei den witzigen Dateityp *.MM.JJJJ.xlsm bekommt und TT heißt.
Wie kann ich das Datum aus dem Tabellenblatt auslesen und in der Form JJJJMMTT als InitialFileName setzen?
Für jede Hilfe bin ich sehr dankbar!!!