Re: [de-users] alte Dokumente unlesbar (Codierung?)

Hallo Rainer,

so etwas dürfte helfen:

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. Also einfach aneinanderreihen und das
Makro mit einem Button in Writer in eine Symbolleiste direkt einbinden.
Öffnest Du jetzt eins der fraglichen Dokumente, so klickst Du auf den
Button und die entsprechenden Zeichen werden ersetzt.

Gruß

Robert
-- 
Homepage: https://www.familiegrosskopf.de/robert


-- 
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
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