Excel VBA Text in Spalten hat zu viele Zeilenfortsetzungen

[wk64]

Hallo,

wenn ich in Excel "manuell" Text in Spalten verwende, wird das auch so durchgeführt.
Aber wenn ich das ganze als Makro aufzeichnen will kommt die Meldung, daß zu viele
Zeilenfortsetzungen verwendet werden.

Wie kann ich das umgehen? Kennt jemand einen VBA-Code der das umgeht?

Danek und Gruß, w64

 

[Moeller13]

Sub TextInSpalten_Sauber()
    With Range("A1:A1000")
        .TextToColumns _
            Destination:=.Cells(1, 1), _
            DataType:=xlDelimited, _
            Semicolon:=True
    End With
End Sub

Das ist der Standardcode für Text in Spalten. Musste dann anpassen auf deine Range und die Trennzeichen