[Excel] Datum ohne Trennzeichen (Punkt) eingeben
#1
Lange Datumsreihen manuell einzugeben ist mühsam und fehlerbehaftet. Da würde sich anbieten, die Datumswerte als Ziffern ohne Trennzeichen einzugeben. Die Hand kann dabei auf dem Ziffernblock bleiben.

Eingabe soll ohne Trennzeichen erfolgen: z.B 110203 für den 11.02.2003 oder 311212 für den 31.12.2012

Wenn das korrekte Datum in der selben Zelle angezeigt werden soll, kommt man um eine VBA-Lösung nicht rum. Vielen stört aber eine Hilfsspalte überhaupt nicht und arbeiten viel lieber mit Formeln. Dafür bietet sich diese Lösung an.

Beispiel: Eingabespalte ist Spalte A, das ins richtige Zahlenformat "übersetzte" Datum steht in Spalte B

Die Zellen in Spalte A sollten der besseren Übersicht wegen (führende Null) mit benutzerdefiniertem Zahlenformat 000000 versehen sein. Für die Umwandlung der Zahlen ins Datumsformat in Spalte B wird diese Formel benötigt:

=DATUM(REST(A1;100)+2000;REST(GANZZAHL(A1/100);100);GANZZAHL(A1/10000))

Das funktioniert allerdings nur, wenn die Jahreszahl größer 1999 ist. Soll das Datum bis 1999 umgewandelt werden, muss in der Formel (rot markiert) 2000 durch 1900 ersetzt werden.

Tabelle1

AB
101010101.01.2001
211111111.11.2011
331129931.12.2099
4
501010101.01.1901
611111111.11.1911
731129931.12.1999
Formeln der Tabelle
ZelleFormel
B1=DATUM(REST(A1;100)+2000;REST(GANZZAHL(A1/100);100);GANZZAHL(A1/10000))
B2=DATUM(REST(A2;100)+2000;REST(GANZZAHL(A2/100);100);GANZZAHL(A2/10000))
B3=DATUM(REST(A3;100)+2000;REST(GANZZAHL(A3/100);100);GANZZAHL(A3/10000))
B5=DATUM(REST(A5;100)+1900;REST(GANZZAHL(A5/100);100);GANZZAHL(A5/10000))
B6=DATUM(REST(A6;100)+1900;REST(GANZZAHL(A6/100);100);GANZZAHL(A6/10000))
B7=DATUM(REST(A7;100)+1900;REST(GANZZAHL(A7/100);100);GANZZAHL(A7/10000))

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4


Stichworte

Schnelleingabe Datum
Datumsreihen
manuelle Eingabe

verwendete Funktionen

DATUM
REST
GANZZAHL
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste