Re: [de-users] Calc: Umlaute umschreiben ü->ue usw.

Hallo OoOHWHOoO,

am 11.07.2018 um 07:24 Uhr schrieb OoOHWHOoO <OoOHWHOoO@t-online.de>:

> Hallo Franklin,
>
> ja, so ist es. Alle "Ä"s werden durch "Ae", alle "ä"s durch "ae", alle 
> "Ö"s durch "Oe" und so weiter ersetzt.

Das ist soweit klar, ich wollte nur wissen / klarstellen, dass man
zu ergänzende Zeichen in "SS" und "RS" immer an der gleichen Stelle
/ Position ergänzen muss.

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

 .... und tschüss

            Franklin


> ------ Originalnachricht ------
> Von: "Franklin Schiftan" <franklin.schiftan@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 <OoOHWHOoO@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" <martinjenniges@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+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
> >
> >
> > --
> > 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

-- 
 ..... und tschüss

               Franklin

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