Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA Format Datum + Uhrzeit

VBA Format Datum + Uhrzeit
18.08.2016 10:00:23
amintire
Hallo, ich hab folgenden Code
ActiveWorkbook.SaveAs Filename:=strFileName & "_" & Format(Date, "dd.mm.yyyy hhmm") & ".xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False
Leider speichert der mir die Datei nicht richtig ab, Datum passt aber Uhrzeit bleibt immer 0000.
Wie kann ich das ändern?
Grüße
amintire
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Format Datum + Uhrzeit
18.08.2016 10:06:57
Luschi
Hallo anintire,
ändere diesen Teil des Codes
Format(Date, "dd.mm.yyyy hhmm")
so
Format(Now, "dd.MM.yyyy hhmm")
Gruß von Luschi
aus klein-Paris
Danke...
18.08.2016 10:11:09
amintire
Hallo Luschi, danke es funktioniert.
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

VBA Formatierung für Datum und Uhrzeit in Excel


Schritt-für-Schritt-Anleitung

Um das Excel VBA Zeitformat für die aktuelle Uhrzeit korrekt zu verwenden, folge diesen Schritten:

  1. Öffne den Visual Basic-Editor in Excel (Alt + F11).

  2. Gehe zu "Einfügen" > "Modul", um ein neues Modul zu erstellen.

  3. Füge den folgenden Code ein:

    Sub SaveWorkbookWithDateTime()
       Dim strFileName As String
       strFileName = "DeinDateiname" ' Hier den gewünschten Dateinamen eingeben
       ActiveWorkbook.SaveAs Filename:=strFileName & "_" & Format(Now, "dd.mm.yyyy_hhmm") & ".xls", _
       FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
    End Sub
  4. Ändere den strFileName, um deine gewünschte Datei zu benennen.

  5. Führe das Makro aus, um die Datei mit dem aktuellen Datum und der Uhrzeit zu speichern.

Mit diesem Code wird die vba aktuelle Uhrzeit korrekt im Format hh:mm in den Dateinamen eingefügt.


Häufige Fehler und Lösungen

  • Problem: Die Uhrzeit wird nicht richtig gespeichert, bleibt 0000.
    • Lösung: Stelle sicher, dass du Format(Now, "dd.MM.yyyy hhmm") verwendest, anstelle von Format(Date, "dd.MM.yyyy hhmm"). Der Now Befehl liefert sowohl Datum als auch Uhrzeit.

Alternative Methoden

Wenn du Datum und Uhrzeit in einer Zelle einfügen möchtest, kannst du den folgenden Code verwenden:

Sub InsertDateTimeInCell()
    Range("A1").Value = Now ' Fügt das aktuelle Datum und die Uhrzeit in Zelle A1 ein
    Range("A1").NumberFormat = "dd.mm.yyyy hh:mm" ' Format für Datum und Uhrzeit festlegen
End Sub

Diese Methode ist ideal, wenn du die vba datum und uhrzeit in einem Arbeitsblatt benötigst.


Praktische Beispiele

  1. Speichern einer Datei mit Datum und Uhrzeit:

    Sub SaveFileWithDateTime()
       Dim fileName As String
       fileName = "Bericht_" & Format(Now, "yyyy-mm-dd_hh-mm-ss") ' Mit Zeitstempel
       ActiveWorkbook.SaveAs Filename:=fileName & ".xlsx", FileFormat:=xlOpenXMLWorkbook
    End Sub
  2. Einfügen von Datum und Uhrzeit in Zelle:

    Sub InsertDateTimeInCellB()
       Cells(1, 1).Value = Format(Now, "dd.mm.yyyy hh:mm") ' Datum und Uhrzeit in Zelle A1
    End Sub

Mit diesen Beispielen kannst du das Excel VBA Zeitformat in verschiedenen Szenarien nutzen.


Tipps für Profis

  • Nutze die Format-Funktion, um verschiedene Zeitformate zu erstellen, z.B. Format(Now, "hh:mm:ss AM/PM") für ein 12-Stunden-Format.
  • Experimentiere mit verschiedenen Excel VBA Format Date- und VBA Time Format-Einstellungen, um deine Daten zu personalisieren.
  • Halte deine VBA-Skripte organisiert und dokumentiere den Code für spätere Referenzen.

FAQ: Häufige Fragen

1. Wie kann ich nur das Datum ohne Uhrzeit speichern?
Verwende Format(Date, "dd.mm.yyyy"), um nur das Datum zu formatieren.

2. Was ist der Unterschied zwischen Date und Now in VBA?
Date gibt nur das aktuelle Datum zurück, während Now sowohl das aktuelle Datum als auch die Uhrzeit zurückgibt.

3. Wie kann ich das Datum in einem anderen Format speichern?
Ändere einfach den Format-String in der Format-Funktion, z.B. Format(Now, "yyyy-mm-dd hh:mm") für ein anderes Format.

Mit diesen Informationen kannst du nun effektiv mit Datum und Uhrzeit in Excel VBA arbeiten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige