Es geht um folgenden Code:

'Zeile anhand des Trennzeichens auf die Zellen aufteilen
.Range(.Cells(i, 1), .Cells(i, 1)).TextToColumns _
Destination:=.Range(.Cells(i, 1), .Cells(i, 1)), _
DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=True, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=False, _
Other:=True, OtherChar:=Trennzeichen, FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), _
Array(4, 1), Array(5, 1))

Er funktioniert Prima, nur fragt Excel jedesmal
"Sollen die Inhalte der Zellen des Zielbereichs überschrieben werden?"

Bei über 500 Zeilen die ich so bearbeite ist das ziemlich nervig. Kann ich das irgendwie beeinflussen das er nicht mehr fragt sondern es einfach macht?