Office: Excel VBA -- Datum und Uhrzeit zerlegen und aufteilen

Hallo zusammen,

ich bin komplett neu auf dem Excel VBA Gebiet und kämpfe mit folgendem Problem, wobei mir Google auch nicht wirklich helfen konnte. Deswegen versuche ich hier mal mein Glück *Smilie

Also, ich habe in Spalte A ein Datum inkl Uhrzeit in folgendem Format:

5/25/09 19:55

nun muss ich das Datum in 4 Spalten aufteilen. Also soll das Datum nun von Spalte A bis Spalte D gehen und folgendes drinnen stehen:

Spalte A --> Jahr
2009

Spalte B --> Monat
05

Spalte C --> Tag
25

Spalte D --> Uhrzeit
19:55

Leider habe ich sehr viele Tabellen, in denen ich dies Anwenden muss und würde es gerne per Makro versuchen. Wichtig ist halt, dass das Datum, was derzeit komplett in Spalte A steht, dann weg ist.

Ich wäre euch auf ewig dankbar, wenn mir bei diesem Problem jemand helfen könnte.

Viele Grüße
Ensky

PS: Ich habe die Excel 2003 Version.

:)

 

Hallo Werner

liegt das jetzt wirklich als Datum vor?
oder ist das ein Text in der Zelle?

mache mal folgendes
in B1= A1*1
steht jetzt in der Zelle B1 eine Fehlermeldung oder eine Zahl

 

Hallo und danke für die schnelle antwort *wink.gif*

Also wenn ich die Formel =A2*1 eingebe, dann steht in der Zelle:

25.05.2009 19:55

also das DAtum in einem anderen Format.

Grüße

 

Die Zellen sind Formatiert nach "Benutzerdefiniert TT.MM.JJJJ hh:mm"

 

HI

per formel

wäre das in den jeweiligen Zellen
=Monat(A1)
=Tag(A1)
=Jahr(A1)
und für die Uhrzeit
=rest(A1;1)
und als Uhrzeit formatieren

über VBA z.B

Code:

ups du willst ja A1 nicht mehr

Code:

normalerweise wird das was du willst zumeist gerade umgekehrt benötigt *wink.gif*

Alle Einnträge in A sollen gewandelt werden

Code:

 

Vielen Dank und ein großes Lob!

Das ist genau das, was ich haben wollte!