VBA .Characters.Delete
16.06.2019 12:07:59
Thomas
ich lösche mit folgendem Code bestimmte Zeichen aus einem Zellentext, Das hat den Vorteil, dass die Formatierung des Rests erhalten bleibt.
For i = Len(rng.Value) To 0 Step -1
If rng.Characters(Start:=i, Length:=1).text = "$" Then
rng.Characters(i, 1).Delete
End If
Next
Das funktioniert ganz bis zu einer Länge des Textes von 256 Zeichen und darüber hinaus nicht mehr.
Hat jemand dazu eine Idee oder Lösung?
Herzliche Grüße
tolo