Hallo Franklin,
ja, so ist es. Alle "Ä"s werden durch "Ae", alle "ä"s durch "ae", alle
"Ö"s durch "Oe" und so weiter ersetzt.
Allerdings habe ich das Ganze (auf die Schnelle) nur mit diesen Wörtern
in jeweils unterschiedlichen CALC-Zellen
Äste => Aeste
ähnlich => aehnlich
Öl => Oel
ölig => oelig
Übel => Uebel
über => ueber
Straße => Strasse
Charité => Charite
getestet. Ich hoffe, ich habe Deine Frage so richtig verstanden.
Gruß
Hans-Werner :-))
------ Originalnachricht ------
Von: "Franklin Schiftan" <franklin.schif...@gmx.de>
An: users@de.libreoffice.org
Gesendet: 11.07.2018 06:53:09
Betreff: Re: [de-users] Calc: Umlaute umschreiben ü->ue usw.
Hallo OoOHWHOoO,
am 10.07.2018 um 18:09 Uhr schrieb OoOHWHOoO <ooohwh...@t-online.de>:
Hallo Micha, das Makro
Sub SearchReplace
Dim oD as Object ' [object] Document
Dim os as Object ' [object] Sheet
Dim oRD as Object ' [object] Replace Descriptor
Dim SS() as String ' [array] Search String
Dim RS() as String ' [array] Replace String
Dim iSR as Long ' [index] Search Replace
SS = Array("Ä" ,"ä" ,"Ö" ,"ö" ,"Ü" ,"ü" ,"ß" ,"é")
RS = Array("Ae","ae","Oe","oe","Ue","ue","ss","e")
oD = ThisComponent
oS = oD.Sheets(0)
oRD = oS.createReplaceDescriptor
For iSR=0 To UBound(SS) Step 1
oRD.SearchCaseSensitive = True
oRD.SearchString = SS(iSR)
oRD.ReplaceString = RS(iSR)
oS.ReplaceAll(oRD)
Next iSR
End Sub
führt (beispielsweise) folgende Ersetzungen in dem aktuell geöffneten
(fokussierten) CALC-Tabellenblatt für alle Zellen durch:
Äste => Aeste
ähnlich => aehnlich
Öl => Oel
ölig => oelig
Übel => Uebel
über => ueber
Straße => Strasse
Charité => Charite
Für weitere Ersetzungen musst Du nur die Arrays "SS" und "RS" um die
entsprechenden Zeichen/Zeichenketten erweitern.
Werden diese Zeichenketten dann nur in das an gleicher Stelle
stehend Pendant aus RS getauscht?
Gruß
Hans-Werner :-))
.... und tschüss
Franklin
------ Originalnachricht ------
Von: "Martin Jenniges" <martinjenni...@skynet.be>
An: users@de.libreoffice.org
Gesendet: 10.07.2018 16:46:41
Betreff: Re: [de-users] Calc: Umlaute umschreiben ü->ue usw.
Hallo Micha,
was ist mit dem Befehl "Suchen und Ersetzen" ? Damit geht es doch ?
Eventuell könnte auch Makro helfen
mit freundlichem Gruss
Martin
Am 10.07.2018 um 14:59 schrieb Micha Kuehn:
Hallo,
gibt es für Calc eine Möglichkeit, Umlaute automatisch zu
umschreiben,
also ü durch ue zu ersetzen und auch ß durch ss? Ich will aus Namen
automatisch E-Mail-Adressen basteln.
Danke,
Micha
-- Liste abmelden mit E-Mail an: users+unsubscr...@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
--
Liste abmelden mit E-Mail an: users+unsubscr...@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
--
Liste abmelden mit E-Mail an: users+unsubscr...@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