Datum in Zahl umwandeln in Excel
Schritt-für-Schritt-Anleitung
Um ein Datum in Excel mittels VBA in eine Zahl umzuwandeln, kannst du den folgenden VBA-Code verwenden. Dieser Code wandelt ein Datum in der Zelle A1 in eine fortlaufende Zahl um und gibt das Ergebnis in Zelle B1 aus:
Sub DatumInZahlUmwandeln()
ActiveSheet.Cells(1, 2) = CLng(ActiveSheet.Cells(1, 1))
End Sub
- Öffne Excel und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Klicke auf
Einfügen > Modul, um ein neues Modul zu erstellen.
- Kopiere den obenstehenden Code in das Modul.
- Schließe den VBA-Editor und gehe zurück zu Excel.
- Gib ein Datum in Zelle A1 ein und führe das Makro aus, um das Datum in Zahl umzuwandeln.
Häufige Fehler und Lösungen
- Datum in Zelle A1 fehlt: Stelle sicher, dass ein gültiges Datum in Zelle A1 steht, sonst gibt der Code einen Fehler aus.
- Zelle B1 bleibt leer: Überprüfe, ob das Makro korrekt ausgeführt wurde. Möglicherweise musst du die Makros in den Excel-Optionen aktivieren.
- Formatierung der Zelle: Wenn das Ergebnis nicht als Zahl angezeigt wird, überprüfe die Formatierung der Zelle B1. Ändere sie gegebenenfalls in "Zahl".
Alternative Methoden
Falls du kein VBA verwenden möchtest, kannst du auch die Excel-Funktion DATWERT nutzen, um ein Datum in eine Zahl umzuwandeln. Hier ist die Vorgehensweise:
- Gib das Datum in Zelle A1 ein.
- In Zelle B1 schreibe die Formel:
=DATWERT(A1)
- Drücke
Enter. Diese Methode gibt dir das Datum als fortlaufende Zahl zurück.
Praktische Beispiele
- Beispiel 1: Wenn du in Zelle A1 das Datum
20.09.2005 eingibst und das Makro ausführst, wird in Zelle B1 die Zahl 38615 angezeigt.
- Beispiel 2: Um mehrere Daten gleichzeitig zu konvertieren, kannst du den VBA-Code anpassen, um eine Schleife zu verwenden, die alle Daten in einer Spalte durchläuft.
Sub MehrereDatenInZahlenUmwandeln()
Dim i As Integer
For i = 1 To 10 ' Angenommen, du hast 10 Daten in der Spalte A
ActiveSheet.Cells(i, 2) = CLng(ActiveSheet.Cells(i, 1))
Next i
End Sub
Tipps für Profis
- Wenn du häufig mit Daten arbeiten musst, die in Zahlen umgewandelt werden, kannst du das Makro anpassen, um das Ergebnis sofort in ein bestimmtes Format zu bringen.
- Nutze die
Format-Funktion in VBA, um das Ausgabeformat zu steuern, falls du eine spezifische Darstellung der Zahl benötigst.
- Denke daran, dass du mit der
VBA-Funktion Date oder CDate arbeiten kannst, um sicherzustellen, dass deine Eingabewerte als Datumswerte interpretiert werden.
FAQ: Häufige Fragen
1. Wie kann ich ein Datum, das bereits als Zahl vorliegt, in ein Datum umwandeln?
Du kannst die Excel-Funktion TEXT verwenden:
=TEXT(A1, "TT.MM.JJJJ")
2. Was ist der Unterschied zwischen CLng und CDate in VBA?
CLng wandelt einen Wert in eine Ganzzahl um, während CDate einen Wert in ein Datum umwandelt. Verwende CDate, wenn du von einer Zahl zu einem Datum zurückkehren möchtest.
3. Kann ich das Datum in Zelle B1 formatieren?
Ja, das kannst du direkt in VBA mit folgendem Code tun:
ActiveSheet.Cells(1, 2).NumberFormat = "TT.MM.JJJJ"
4. Gibt es eine Möglichkeit, mehrere Daten auf einmal zu konvertieren?
Ja, du kannst eine Schleife in deinem VBA-Code verwenden, um alle Daten in einer Spalte zu verarbeiten, wie im praktischen Beispiel gezeigt.