Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
168to172
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
168to172
168to172
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

1901 -> 2001

1901 -> 2001
11.10.2002 20:30:32
ROlf
Hallo zusammen,

habe importierte Datumswerte die Excel aber als 1901, 1902 etc. erkennt. Kann man des abschalten oder geht das nur über ersetzen ?

Vielen Dank
ROlf

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: 1901 -> 2001
11.10.2002 21:03:28
jinx
Moin, ROlf,

und wie werden diese Werte importiert? Normalerweise sollte Excel alle Werte, die kleiner als 1.1.30 sind, als Werte dieses Jahrhunderts dargestellen (dies ist AFAIK eine interne Funktion).

cu
jinx

Re: 1901 -> 2001
11.10.2002 21:10:00
ROlf
Hi jinx,

die Zahlenwerte kommen ursprünglich von eine Unix-Rechner, als Ascii-Datei, werden in MONARCH (sehr cooles Programm) auf die benötigten Werte zusammen gestaucht und als Excel-File exportiert. Dann sehen die Datumswerte so aus yymmdd. Excel ist auch ziemlich am meckern, daß einige Datumswerte verloren gegangen sind.

Gruß
ROlf

Re: 1901 -> 2001
11.10.2002 21:34:52
jinx
Moin, ROlf,

so cool das Progamm auch sein mag, als Tabellenfunktion würde ich das Datum z.B. per =DATWERT(RECHTS(A1;2) & "." & TEIL(A1;3;2) & "." & LINKS(A1;2)) und entsprechender Formatierung konvertieren, wenn denn das "Datum" in A1 steht - per VBA z.B.


Sub DatumUmwandeln()
    Wert = ActiveCell.Value
    Neuwert = Right(Wert, 2) & "." & Mid(Wert, 3, 2) & "." & Left(Wert, 2)
    ActiveCell.Value = Format(Neuwert, "dd.mm.yyyy")
End Sub

 

     Code eingefügt mit Syntaxhighlighter 1.15

cu
jinx
Anzeige
Re: 1901 -> 2001
11.10.2002 22:01:55
ROlf
Hi jinx,

daß muß ich mir mal ausprobieren.

Der VBA-Code würde nur funktionieren wenn Format von Datum alt = yymmdd, oder ? Die Bedingung? "Mid(Wert, 3, 2)" kann ich nachvollziehen, was sagt die 3 aus ?

Gruß
ROlf

Re: 1901 -> 2001
11.10.2002 22:11:45
jinx
Moin ROlf,

ich hatte bei mir die Ursprungszelle wegen der führenden Null als Text formatiert; wenn es eine Zahl ist, muss eine Wenn-Abfrage über die Anzahl der Zeichen in der Zelle durchgeführt und entsprechend eingebaut werden.

Die Anweisung MID entspricht der Funktion TEIL, wobei im obigen Beispiel Wert die Datenvariable darstellt, 3 das Zeichen angibt, ab dem ausgelesen wird und 2 die Anzahl der Zeichen...

HTH
jinx

Anzeige
Re: 1901 -> 2001
11.10.2002 22:19:15
ROlf
Hi jinx,

okey.

Danke für Deinen Support.

Gruß ROlf

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige