Datumsproblem
21.07.2005 13:59:21
Christoph
ich hab ein Problem mit meinem Datum.
und zwar hab ich eine Spalte, mit amerikanischen Datumsformaten.
Dies wird durch das folgende Script formatiert.
Sub cut()
For a = 2 To 1000
If Range("G" & a) = "" Then
Exit Sub
End If
On Error GoTo weiter
Range("H" & a) = Mid(Range("H" & a), 3)
Range("H" & a).Value = Left(Range("H" & a).Text, InStr(1, Range("H" & a).Text, ",") - 2)
weiter:
Next a
End Sub
Wenn nun zu Beginn 08/03/05 16:25:02in der Zelle steht, so steht anschließend 03.08.2005 16:25:02. Das ist aber falsch.
Alle Daten, wo de Tag größer 12 ist haut die Formatierung hin.
Habt ihr eine Idee, wie ich das Problem lösen kann?
Gruß
Christoph