Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1808to1812
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Suchen&Ersetzen automatisieren

Suchen&Ersetzen automatisieren
30.01.2021 09:29:13
nils
Hallo liebe Excel/Calc-Profis,
ich doktere gerade an folgendem Problem, für das ich leider noch keine Lösungsidee mit meinen Kenntnissen habe:
Ich muss regelmäßig für die Schule unseren Datensatz aller Schüler, Kurse, Lehrer, .. für unsere Schulcloud exportieren und für den Import als csv aufbereiten
Folgende Probleme treten dabei auf:
  • es gibt immer wieder doppelte Leerzeichen.
  • aus "&" soll ein "und" werden (Sonst gibt es mit der Cloud Probleme)
  • einfache Leerzeichen " " müssen zu einem "-" geändert werden

  • Bisher nutze ich für 3 Tabellen jedes mal händisch suchen und ersetzen für alles.
    Kann ich das für bestimme Tabellen in meiner Mappe automatisieren?
    Danke für eure Ideen und Vorschläge.
    Nils

    9
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Suchen&Ersetzen automatisieren
    30.01.2021 09:39:06
    Günther
    Moin Nils,
    mit VBA ist das gewiss machbar.
    Nutze bei Bedarf den Makrorecorder und wenn es dann noch an einzelnen Stellen hakt, spielt gewiss die eine oder der andere von uns "Nachhilfelehrer" ☺.
     
    Gruß
    Günther  |  mein Excel-Blog
    AW: Suchen&Ersetzen automatisieren
    30.01.2021 09:49:50
    Oberschlumpf
    Hi,
    
    For durchlauf = Startzeile to Endzeile
    Zelle = Replace(Zelle, "  ", " ")
    Zelle = Replace(Zelle, "&", "und")
    Zelle = Replace(Zelle, " ", "-")
    Next
    

    Für die Platzhalter musst halt du die richtigen Werte eintragen, da ja ich nich weiß, welche Zeilen/Spalten du benutzt.
    Hilfts?
    Ciao
    Thorsten
    Anzeige
    @Oberschlumpf
    30.01.2021 10:53:27
    RPP63
    Moin Thorsten!
    Warum Schleife mittels Replace-Funktion?
    Die Range.Replace-Methode macht das in einem Rutsch:
    Cells.Replace(Zelle, "  ", " ")
    Cells.Replace(Zelle, " ", "-")
    Cells.Replace(Zelle, "&", "und")
    

    Gruß Ralf
    Das kommt von C&P
    30.01.2021 10:55:08
    C&P
    Natürlich
    Cells.Replace("  ", " ", xlPart)
    Cells.Replace(" ", "-", xlPart)
    Cells.Replace("&", "und", xlPart)
    

    AW: @Oberschlumpf
    30.01.2021 11:48:07
    Oberschlumpf
    Hi Ralf,
    a) weil es mit der Replace- + For/Next-Variante doch auch funktionieren würde ;-)
    b) weil ich deine Variante noch nicht kannte
    Ciao
    Thorsten
    Anzeige
    GLÄTTEN besser, als fix-vielfache Leerz. zu wechs.
    30.01.2021 11:12:52
    lupo1
    Das wäre dann WorksheetFunction.Trim. Nicht Trim!
    Ja, aber AGGREGAT war nicht gefragt.
    30.01.2021 11:42:24
    lupo1
    Es geht nicht darum, dass es überhaupt eine {}-lose Formel-Möglichkeit gibt, sondern dass in xl365 gelegentlich für eine vorgegebene Formel doch noch {} verwendet werden muss.
    Das scheint öfters mit WENN innerhalb von SUMME oder MAX/MIN der Fall zu sein.
    Anzeige
    AW: wäre dort aber die günstigere Alternative owT
    30.01.2021 11:50:50
    neopa
    Gruß Werner
    .. , - ...

    Beliebteste Forumthreads (12 Monate)

    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige