Hallo Community,

ich hoffe Ihr könnt mir helfen, ich habe in einer csv -Datei in einer Zelle Datum und Zeit zusammenstehen und will diese nun mit dem Befehl TexttoColumns trennen. Dabei interessiert mich nur die Zeit.

Der Zellinhalt sieht z.B. so aus: 2011-05-11 18:24:45

Wenn ich manuell in Excel mit TextinSpalten arbeite, klappt die Trennung einwandfrei und ich habe zum Schluss in der Zelle nur noch die korrekte Zeit 18:24:45  stehen.

Nutze ich aber die Makroaufzeichnung und führe den Befehl aus, verändert mir Texttocolumns automatisch das Zeitformat und gibt mir in 2 Spalten die Zeit in AM/PM aus, es ist auch egal wie ich die Zeitformate setze:

Mein Code:

wksDL.Range(Cells(17, 2), Cells(Rows.Count, 2).End(xlUp)).Select
    Selection.TextToColumns Destination:=wksDL.Range(Cells(17, 2), Cells(Rows.Count, 2).End(xlUp)), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
        :=Array(Array(1, 9), Array(2, 1)), TrailingMinusNumbers:=True
        

Ich weiß leider nicht weiter und hoffe das ihr mir helfen könnt.

Gruß

Wald