© AKS - Adobe Stock Wie Sie alle Zeichen in einer Tabelle durch andere Zeichen ersetzen Kennen Sie das? Daten, die Sie von Geschäftspartnern oder nach dem Datenimport erhalten, beinhalten falsche Zeichen. So kann es sein, dass überall dort, wo ein Dezimalkomma notwendig ist, ein Dezimalpunkt auftaucht. Oder es kann passieren, dass Schrägstriche zwischen einzelnen Ziffern auftreten. Über das Kommando ERSETZEN können Sie diese Zeichen finden und durch andere Zeichen ersetzen. Das macht aber viel Mühe, wenn Sie diesen Vorgang häufiger ausführen möchten. Zeit sparen Sie, indem Sie die Aufgabe per Makro durchführen. VBA - Sonderzeichen suchen & ersetzen - MS-Office-Forum. Dieses Makro können Sie künftig in der gleichen Situation schnell und einfach wieder aufrufen. Um das Makro in eine leere Arbeitsmappe einzubinden, öffnen Sie in allen Excel-Versionen über die Tastenkombination STRG N eine neue Arbeitsmappe. Drücken Sie anschließend die Tastenkombination ALT F11, um den VBA-Editor aufzurufen. Wählen Sie dort das Kommando EINFÜGEN - MODUL. Geben Sie anschließend das folgende Makro ein: Sub ZeichenTauschen() On Error Resume Next Dim Zelle As Range Dim SuchenNach As String Dim ErsetzenDurch As String SuchenNach = ". "
Hat jemand eine Idee, wie ich vorgehen könnte? Jeder Hinweis würde mir sehr helfen. Ein Dokument mit Beispieltext habe ich angefügt. Schöne Grüße! 05. 2020, 14:08 # 2 MOF Meister Registrierung: 09. 09. 2010 Karma: Du kannst mit S&E keine Steuerlemente einfügen. Per VBA nur ein Zeichen ersetzen - - - - - - Office-Loesung.de. Da musst Du schon selbst ran oder ein Makro basteln. Gruß G. O. __________________ Wer mehr über PowerPoint und Word wissen möchte, kann gern mal hier reinschauen. 05. 2020, 16:37 # 3 MOF Guru Registrierung: 20. 2008 Hallo castillo, das Auslassungszeichen ist das Ascii-Zeichen 133 bzw. das Unicode-Zeichen 8230. Mit dieser Nummer kannst du einen Suchen-Vorgang durchführen, in dessen Verlauf du ein Kontrollkästchen einfügen kannst. Das ginge zum Beispiel so: Code: Sub ersetzeAuslassung() Dim suchbereich As Range Dim CC As ContentControl Set suchbereich = With = ChrW(8230) Do While. Execute Set CC = ( _ Type:=wdContentControlText, Range:=suchbereich) With CC = "" = "Auslassung" End With tRange + 1, Loop End Sub Dann krieg raus, um welches Unicode-Zeichen es sich bei dem Kästchen handelt, indem du es markierst und im Direktfenster des VBA-Editors eingibst:?
mit VBA Leerzeichen durch "-" ersetzen von Bastian vom 22. 09. 2006 10:29:38 AW: mit VBA Leerzeichen durch "-" ersetzen - von {mskro} am 22. 2006 10:31:45 AW: mit VBA Leerzeichen durch "-" ersetzen - von chris b am 22. 2006 10:32:58 AW: mit VBA Leerzeichen durch "-" ersetzen - von UweD am 22. 2006 10:42:14 Betrifft: mit VBA Leerzeichen durch "-" ersetzen von: Bastian Geschrieben am: 22. 2006 10:29:38 Guten Morgen, wie ersetze ich am einfachsten ein Leerzeichen in einem String durch einen Unterstrich? Also statt PC Brenner soll dann PC_Brenner zurückgegeben werden. der String befindet sich in der Variablen "Leerzeichen" Danke Grüße, Bastian Betrifft: AW: mit VBA Leerzeichen durch "-" ersetzen von: {mskro} Geschrieben am: 22. 2006 10:31:45 Hallo Bastian, place What:=" ", Replacement:="_", LookAt:=xlPart, SearchOrder _:=xlByRows, MatchCase:=False Gruss Manfred Rückmeldung wäre nett! Vba zeichen ersetzen video. von: chris b Geschrieben am: 22. 2006 10:32:58 Hallo Bastina, so gehts. Sub neu() txt = bstitute(txt, "'", "") End Sub von: UweD Geschrieben am: 22.
05. 03. 2020, 12:54 # 1 stillo VBA - Sonderzeichen suchen & ersetzen Hallo, ich möchte gerne in einem Word-Dokument zwei (an vielen Stellen vorkommende) Sonderzeichen jeweils per Makro durch ein Kontrollkästchen (CheckBox) bzw. ein Textfeld ersetzen. Bei den Sonderzeichen handelt es sich um ein Kästchen und Auslassungspunkte (1 Zeichen). Um das zu visualisieren: Zunächst dachte ich an ein einfaches Suchen & Ersetzen, aber über den normalen Word-Dialog kann ich die Zeichen nicht einfügen. Dann habe ich mich im Forum eingelesen in Makros für suchen & ersetzen (z. B. Zeichen in Excel-Zellen austauschen | VBA-Makros - computerwissen.de. hier und hier). Aber damit habe ich es nicht geschafft. Vor allem aus zwei Gründen: 1) Erstens bekomme ich nicht heraus, welches das erste Sonderzeichen im Ausgangstext ist. Über die Zwischenablage kann ich es in den VB-Editor nicht einfügen, stattdessen erscheint wird immer ein "•"-Zeichen eingefügt. 2) Zweitens kann ich den Ersetzen-Text in einem Makro nicht mit den Checkboxes bzw. den Textfeldern versehen. Als einfachen Text kann ich sie ja nicht einfügen.
Der Vorteil: Leerzeichen innerhalb des Zellwertes werden nicht entfernt (z. "Vorname Nachname" innerhalb einer Zelle). Ebenso werden mehrere aufeinanderfolgende Leerzeichen zwischen Werten auf ein Leerzeichen reduziert. Die Formelfunktion =SÄUBERN() dagegen entfernt alle nicht druckbaren Zeichen innerhalb der Zelle. Nicht druckbare Zeichen werden innerhalb der Zelle mit einem Kästchen dargestellt. Nachdem die betroffenen Spalten mit einer Formelfunktion bereinigt wurden, sollten Sie im Anschluss noch die Formeln entfernen. Und so funktioniert es: Wählen Sie die betroffene Spalte mit den Formelfunktionen aus. Kopieren Sie die gesamte Spalte mit "Strg+C" oder der rechten Maustaste + "Kopieren", klicken Sie anschließend die rechte Maustaste und wählen in den Einfügeoptionen die Variante "Inhalte einfügen" aus. Wiederholen Sie den Vorgang ggf. für weitere Spalten. Vba zeichen ersetzen default. Alternativ kann der Vorgang auch gleich für mehrere Spalten, Zeilen oder den gesamten Zellbereich ausgeführt werden. Markieren Sie hierfür zunächst den gewünschten Bereich, bevor Sie mit Punkt 2 fortfahren.
Wie kann ich ersetzen, die mehr als eine Sache in eine string-variable? Zeichen ersetzen vba. Hier mein Beispiel-Funktion in vba: Private Function ExampleFunc ( ByVal unitNr $) As String If InStr ( unitNr, "OE") > 0 Then unitNr = Replace ( unitNr, "OE", "") unitNr = Replace ( unitNr, ";", "") End If... End Function Gibt es eine bessere Lösung? Ich würde "Nein" sagen 🙂 Sieht OK Sie könnten den Müll in ein array und eine Schleife durch die Elemente des Arrays. Informationsquelle Autor yuro | 2016-05-02