Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Datei unter bestimmten Namen und Datum sichern

Frage Entwicklung VB for Applications

Mitglied: HansWurstAugust

HansWurstAugust (Level 1) - Jetzt verbinden

04.05.2012, aktualisiert 15:16 Uhr, 5982 Aufrufe, 5 Kommentare

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"
Mitglied: bastla
04.05.2012 um 15:15 Uhr
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:
01.
FName = Application.GetSaveAsFilename _ 
02.
(sOrdner & sblattname & Format(Date, "DD.MM.YYYY"), "Micrsoft Excel-Dateien (*.csv),*.csv")
Grüße
bastla
Bitte warten ..
Mitglied: mak-xxl
04.05.2012 um 15:16 Uhr
Moin HWA,

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
Bitte warten ..
Mitglied: Biber
04.05.2012 um 15:42 Uhr
[OT]
...erstaunlich, dass die *.csv bei euch allen dreien einheitlich
...Micrsoft Excel-Dateien...
...heissen.

Wird hier ein neuer Standard etabliert?

Grüße
Biber
[/OT]
Bitte warten ..
Mitglied: bastla
04.05.2012 um 15:48 Uhr
[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]
Bitte warten ..
Mitglied: 106009
04.05.2012 um 15:49 Uhr
[OT]
Wird hier ein neuer Standard etabliert?
Möglicherweise ja nur auf der Insel Mario. Die anderen Inseln verwenden sicher den normalen Standard.
[/OT]
Bitte warten ..
Neuester Wissensbeitrag
Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...

Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...