Hallo Robert,

Am Mon, 6 Jan 2020 07:59:24 +0100
schrieb Robert Großkopf <[email protected]>:
> 
> SUB SearchReplace
>       oReplace = ThisComponent.CreateReplaceDescriptor
>       oReplace.SetSearchString("Š")
>       oReplace.SetReplaceString("ä")
>       ThisComponent.replaceAll(oReplace)
>       oReplace = ThisComponent.CreateReplaceDescriptor
>       oReplace.SetSearchString("†")
>       oReplace.SetReplaceString("Ü")
>       ThisComponent.replaceAll(oReplace)
> END SUB
> 
> Ich habe jetzt nur 2 der Zeichen aus Deinem Beispiel übernommen.
> Insgesamt dürften es ja 7 sein. 

Es sind deutlich mehr mehr - z.B. ç, Ç, ã, Ã, ñ, Ñ, õ, Õ, á, Á, ó, Ó,
â, ..... etc. Dennoch halte ich die Aufgabe für überschaubar, weil es
ja nicht unendlich viele Zeichen sind.

> Also einfach aneinanderreihen und das > Makro mit einem Button in
> Writer in eine Symbolleiste direkt einbinden. 

Ok. Leider habe ich null Ahnung vom Erstellen von Makros, weiß also
nicht, wie ich diese Aufgabe anpacken muss.

> Öffnest Du jetzt eins der fraglichen Dokumente, so klickst Du auf den
> Button und die entsprechenden Zeichen werden ersetzt.
> 
Das klingt schon mal gut ;-)

Viele Grüße

Rainer

-- 
Liste abmelden mit E-Mail an: [email protected]
Probleme? 
https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy

Antwort per Email an