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

Hallo Robert,

ein Nachtrag:

Am Mon, 6 Jan 2020 08:16:37 +0100
schrieb Rainer <spots4as@gmx.de>:

> Am Mon, 6 Jan 2020 07:59:24 +0100
> schrieb Robert Großkopf <robert@familiegrosskopf.de>:
> > 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 ;-)
Das Makro-Thema muss ich vor vielen Jahren schon einmal "in der Mache"
gehabt und dann komplett aus den Augen verloren haben. Jedenfalls habe
ich kaum noch wahrgenommen, dass es hier in der Symbolleiste einen
Button "Sonderzeichen" gibt - und siehe da: Dahinter verbirgt sich auch
ein Makro. Ein Test hat gezeigt, dass es funktioniert. So sieht es aus:

https://paste.ubuntu.com/p/c8N2rqKTzB/

Die von mir erwähnten, zusätzlichen Zeichen sind zwar nicht dabei, aber
es ist gut möglich, dass ich sie damals noch gar nicht benutzt habe.
Falls erforderlich, müsste ich das Makro erweitern. Die Frage ist nur:
Wie geht das? Ins vorhandene Makro einfach einen Abschnitt per copy 'n'
paste neu einfügen und anpassen?

Viele Grüße

Rainer

-- 
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