|
Ich arbeite an einem Makro, mit dem ich die Zellen einer Tabelle durchgehe und bestimmte Konstellationen (Textstellen in Klammern) formatiere. Zum formatieren benutze ich Methoden, z. B.
zelle.Range.Characters(xd2).Font.Size = Schriftgr2
So weit so gut.
Teilweise muss der Text auch erweitert werden. Wenn eine bestimmte Zeichenkombination auftaucht, wird dazwischen ein Zeichen eingefügt. Dafür nutze ich die Mid()-Funktion und ebenfalls Methoden, z. B.
strink = Mid(strink, 1, xd1) & "1" & Mid(strink, xd1 + 1, strinklaenge - xd1)
zelle.Range.Text = strink
Jetzt kommt mein Problem. Wenn ich das tue, setzt VBA eine ungewollte Absatzmarke ans Ende des Zellinhalts. Woran liegt das und wie kann ich das umgehen?
(Office 2007, Windows 10)
|