gibt es die Möglichkeit bei Excel, via VBA, Zeilenumbrüche absolut zu definieren? Kann z.B. nach dem 10ten Zeichen des Textes der Text innerhalb einer Zelle umgebrochen werden? Wenn ja, wer weiss wie's geht?
Ich bin für Hilfe dankbar,
Gaidin
Sub Umbruch()
Dim strTeil As String, strText As String, strAlles As String
Dim i As Integer, x As Integer
strText = Cells(1, 1).Value
x = 10
intCount = Int(Len(Cells(1, 1).Value) / x)
For i = 1 To intCount + 1
If Len(strText) > x Then
strTeil = Left(strText, x)
strText = Mid(strText, x + 1, Len(strText) - x)
Else
strTeil = strText
End If
strAlles = strAlles & strTeil & Chr(10)
Next i
MsgBox strAlles
End Sub