|
Hallo zusammen,
ich habe ein kleines Problem und zwar:
In einer Datei sind in einer Spalte untereinander Datum und Uhrzeit zusammen in je einer Zelle, ich brauche aber beide in getrennten Zellen. Jetzt habe ich es mit dem Befehl Text in Spalten getrennt, manuell oder auch als Makro
Sub datum_uhrzeit_trennen()
Application.DisplayAlerts = False
Range("Q2").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.TextToColumns Destination:=Range("EA2"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
Application.GoTo Reference:="R1C1"
Application.DisplayAlerts = True
End Sub
Das Problem ist, dass er immer die ersten 35 Daten richtig behandelt, und richtig trennt; den ganzen Rest (insgesamt ca 600) aber falsch. Es kommen komplett falsche Zahlen raus, die Uhrzeit und das Datum stimmen nicht mit den Ur-Zellen überein. Ich habe leider keine Ahnung wo das herkommt....
Kennt jemand das Problem oder sogar eine Lösung?
Das Problem ist, dass wenn ich es auf mehreren Computern laufen lasse, es nur auf manchen PCs falsch ist, auf anderen stimmt alles. Auch alle anderen Programme außer Excel sind geschlossen, Zwischenspeicher geleert etc. etc.
Danke schonmal!
|