Wie kann ich in Excel automatisch Zahlen in ein Datum umwandeln?
Hallo,
ich möchte in Excel eine Tabelle erstellen, wo ich ein Datum ohne Punkt eingebe und Excel soll es dann automatisch in ein Datumsformat umwandeln.
(Z.B.: Ich gebe in eine Spalte folgende Zahl ein 06052017 und Excel soll automatisch folgendes daraus machen: 06.05.2017)
3 Antworten
Hallo
Folgende Lösung mit VBA gibt es auch noch:
Eine bestimmte Zelle formatieren (in dem Fall C3):
Sub EinzelneZelle()
Range("C3").NumberFormat = "mm.dd.yyyy"
End sub
Mehrere Zellen einer Spalte:
Sub MehrereZellen()
Dim x as Long
For x = 3 to 500
Range("C" & x ).NumberFormat = "mm.dd.yyyy"
Next x
End sub
Die Bsp sind ungetestet, sollten aber funktionieren.
Wenn du die Formatierung auf einer anderen Tabelle durchführen möchtest, dann brauchst du davor nur Tabelle2 oder welche auch immer eingeben.
Tabelle2.Range(....)
Wenn du die Dinge in diesem Format eingibst, dann funktioniert mit dieser Formel die Wandlung in ein Datum: =DATUM(RECHTS(J12;4);TEIL(J12;3;2);LINKS(J12;2))
ABER:
Excel entfernt die führende Null: 06052017
also das Ding als Text eingeben mit nem führenden Hochkomma: '06052017
Soll das in derselben Zelle passieren? Dann geht das nur über VBA, sprich ein Ereignismakro. Wenn Du Dich damit nicht auskennst, würde ich aber eher davon abraten.
Um die Eingabe des Datums zu erleichtern, gebe ICH immer statt der Punkte Querstriche ein, das verwandelt Excel automatisch in ein Datum mit Punkten. Also:
Eingabe: 6/5/17
Ausgabe 06.05.2017Wobei die Zelle formatiert sein muss als:
TT.MM.JJJJ
Alternativ könnte ich Dir eine Formel schicken, die Deine o.g. Eingabe in einer Nachbarzelle als Datum ausgibt.
Kennst Du Dich denn mit VBA etwas aus und weißt über Ereignismakros Bescheid? Dann schicke ich Dir einen Code. Wenn nicht nutze lieber die Formel die Dir inzwischen schon @IchMalWiederXY genannt hat.
P.S.: "Zelle S" gibt es nicht.
Das soll in der selben Zelle Passieren (Bei mir Zelle S).