Re: Schwärzen bzw. markierte Textstellen durch gleiche Anzahl eines Zeichens ersetzen
Verfasst: Mi, 25.03.2020 22:38
z.B. folgendes Makro tut das:
Gruß
Stephan
Code: Alles auswählen
akt_sel = ThisComponent.getCurrentSelection
For i = 0 To akt_sel.Count-1
tmp_sel = akt_sel(i)
akt_sel(i).String = String(LEN(akt_sel(i).String), "*")
Next i
Gruß
Stephan