5
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"
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 184487
Url: https://administrator.de/contentid/184487
Printed on: April 25, 2024 at 16:04 o'clock
5 Comments
Latest comment
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]
