Datumsformat in Excel per Makro ändern
Schritt-für-Schritt-Anleitung
Um das Datumsformat in Excel per Makro zu ändern, folge diesen einfachen Schritten. Dieses Beispiel geht davon aus, dass du Excel 2016 oder höher verwendest.
-
Öffne die Excel-Datei, in der du das Datumsformat ändern möchtest.
-
Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.
-
Wähle im Menü Einfügen die Option Modul, um ein neues Modul zu erstellen.
-
Kopiere und füge den folgenden VBA-Code ein:
Sub Datum()
Dim i As Long
Application.ScreenUpdating = False
With Sheets("Tabelle1")
For i = 2 To .Cells(Rows.Count, "B").End(xlUp).Row
.Cells(i, "A") = CDate(.Cells(i, "B"))
.Cells(i, "A").NumberFormat = "dd.mm.yyyy"
Next i
End With
Application.ScreenUpdating = True
End Sub
-
Schließe den VBA-Editor und kehre zurück zu Excel.
-
Drücke ALT + F8, wähle das Makro Datum aus und klicke auf Ausführen.
Häufige Fehler und Lösungen
-
Problem: Das Makro funktioniert nicht.
- Lösung: Stelle sicher, dass die Zellen in Spalte B gültige Datumswerte enthalten. Wenn die Zellen Text sind, konvertiere sie zuerst in das richtige Datumsformat.
-
Problem: Fehlermeldungen beim Ausführen des Makros.
- Lösung: Überprüfe, ob die Zellen tatsächlich Daten enthalten und dass du die richtige Tabellenblattbezeichnung verwendest.
-
Problem: Die Formatierung wird nicht korrekt angewendet.
- Lösung: Stelle sicher, dass das Format in Excel korrekt gesetzt ist. Nutze
NumberFormat, um das Datumsformat zu ändern.
Alternative Methoden
Falls du kein Makro verwenden möchtest, kannst du auch folgende Methoden ausprobieren:
-
Formel verwenden: Du kannst die Formel =DATWERT(B3) in einer neuen Spalte verwenden, um das Datumsformat zu ändern. Nachdem du die Formel angewendet hast, kannst du die Zellen kopieren und als Werte einfügen.
-
Inhalte einfügen: Schreibe eine 1 in eine leere Zelle, kopiere diese, markiere die Zellen, die du ändern möchtest, und wähle Inhalte einfügen > Multiplizieren. Dies konvertiert Textdaten in Zahlen.
Praktische Beispiele
-
Beispiel 1: Wenn du das Datum von 01.01.17 auf 01.01.2017 ändern möchtest, stelle sicher, dass du die richtige VBA-Formatierung verwendest.
.Cells(i, "A").NumberFormat = "dd.mm.yyyy"
-
Beispiel 2: Um ein ganzes Datenfeld zu formatieren, kannst du die oben genannten Methoden kombinieren und das Makro entsprechend anpassen.
Tipps für Profis
- Nutze die
Application.ScreenUpdating = False-Anweisung, um die Ausführungsgeschwindigkeit des Makros zu erhöhen.
- Teste dein Makro zunächst in einer Kopie deiner Datei, um unerwünschte Änderungen zu vermeiden.
- Verwende die
Debug.Print-Anweisung innerhalb des Codes, um den Fortschritt beim Debuggen zu verfolgen.
FAQ: Häufige Fragen
1. Wie kann ich das Datumsformat in Excel dauerhaft ändern?
Du kannst das Standarddatumsformat in den Excel-Optionen ändern, aber es wird empfohlen, die Formatierung pro Tabelle anzuwenden, um Konsistenz zu gewährleisten.
2. Funktioniert das Makro auch in älteren Excel-Versionen?
Ja, das VBA-Makro sollte auch in Excel 2010 und 2013 funktionieren, solange die grundlegenden VBA-Funktionen unterstützt werden.
3. Was tun, wenn ich eine Fehlermeldung erhalte?
Überprüfe zuerst die Datentypen in den betroffenen Zellen. Textdaten müssen in das Datumsformat konvertiert werden, bevor das Makro erfolgreich ausgeführt werden kann.