Mit einem VBA-Makro in MS Excel können wirklich nicht mehr als 255 Zeichen in eine einzelne Zelle eingefügt werden?

Beispielcode

Option Explicit
Sub TestSub()
  Dim L As Long
'  Const str = "1" & vbLf
  Dim i As Integer
  Range("A1").ClearContents
  Range("A1").WrapText = True
  For i = 1 To 260  ' any number greatest than 255
    L = Range("A1").Characters.Count
    Debug.Print L
    Range("A1").Characters(L + 1, 1).Insert ("A")
  Next i
End Sub

Hinzugefügt Es ist wichtig, die vorherige Formatierung der Zeichen in der Zelle zu speichern.