Datei unter bestimmten Namen und Datum sichern
Hallo,
progge in Excel 2010 gerade ein Makro. Ziel ist u.a. die Datei in einem bestimmten Vz unter best. Namen und Datum abzulegen.
Das habe ich auch schon fast komplett hingekriegt nur mit dem Datum happerts.
Wenn ich das Datum testweise ausgeben lasse geht es perfekt:
MsgBox (Format(Date, "DD.MM.YYYY"))
Baue ich die Datumsfunktion hier ein, kommt leider kein Dateiname mehr zustande:
FName = Application.GetSaveAsFilename _
(sOrdner & sblattname, "Micrsoft Excel-Dateien (*.csv),*.csv")
Kann mir wer sagen wie ich das Datum hier reinkriege? Danke!
SO GEHTS:
sblattname = "test_" & Format(Date$, "dd.mm.yy") & ".csv"
progge in Excel 2010 gerade ein Makro. Ziel ist u.a. die Datei in einem bestimmten Vz unter best. Namen und Datum abzulegen.
Das habe ich auch schon fast komplett hingekriegt nur mit dem Datum happerts.
Wenn ich das Datum testweise ausgeben lasse geht es perfekt:
MsgBox (Format(Date, "DD.MM.YYYY"))
Baue ich die Datumsfunktion hier ein, kommt leider kein Dateiname mehr zustande:
FName = Application.GetSaveAsFilename _
(sOrdner & sblattname, "Micrsoft Excel-Dateien (*.csv),*.csv")
Kann mir wer sagen wie ich das Datum hier reinkriege? Danke!
SO GEHTS:
sblattname = "test_" & Format(Date$, "dd.mm.yy") & ".csv"
Kommentieren
Teilen
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 184487
Url: https://administrator.de/forum/datei-unter-bestimmten-namen-und-datum-sichern-184487.html
Ausgedruckt am: 18.06.2025 um 05:06 Uhr
5 Kommentare
Neuester Kommentar
Hallo HansWurstAugust!
Mich würden zwar sowohl die Reihenfolge "Tag/Monat/Jahr" als auch die Punkte dazwischen stören, aber ansonsten sehe ich eigentlich das Problem nicht:
Grüße
bastla
Mich würden zwar sowohl die Reihenfolge "Tag/Monat/Jahr" als auch die Punkte dazwischen stören, aber ansonsten sehe ich eigentlich das Problem nicht:
FName = Application.GetSaveAsFilename _
(sOrdner & sblattname & Format(Date, "DD.MM.YYYY"), "Micrsoft Excel-Dateien (*.csv),*.csv") bastla
Moin HWA,
was hindert Dich, z.B. so zu tun:
Freundliche Grüße von der Insel - Mario
was hindert Dich, z.B. so zu tun:
FName = Application.GetSaveAsFilename(sOrdner & sblattname & " vom " & Format(Date, "DD.MM.YYYY"), "Micrsoft Excel-Dateien (*.csv),*.csv")Freundliche Grüße von der Insel - Mario
[OT]
...erstaunlich, dass die *.csv bei euch allen dreien einheitlich
Wird hier ein neuer Standard etabliert?
Grüße
Biber
[/OT]
...erstaunlich, dass die *.csv bei euch allen dreien einheitlich
...Micrsoft Excel-Dateien...
...heissen.Wird hier ein neuer Standard etabliert?
Grüße
Biber
[/OT]
[OT] @Biber
Nu lass doch HansWurstAugust die persönliche Note
(und abgesehen davon tut das Script ja auch so, was es soll) ...
Grüße
bastla
[/OT]
Nu lass doch HansWurstAugust die persönliche Note
(und abgesehen davon tut das Script ja auch so, was es soll) ...Grüße
bastla
[/OT]
[OT]
[/OT]
Wird hier ein neuer Standard etabliert?
Möglicherweise ja nur auf der Insel Mario. Die anderen Inseln verwenden sicher den normalen Standard. [/OT]
