Funktion zum Suchen und Ersetzen in VBA
Wenn Ihr Excel-Job Routineaufgaben beinhaltet, etwas zu finden und durch etwas zu ersetzen, benötigen Sie diesen Artikel um jeden Preis. Denn nach dem Lesen dieses Artikels würden Sie wahrscheinlich 80% Ihrer Zeit sparen, wenn Sie diese VBA-Codierungstechnik erlernen. Suchen und Ersetzen in Excel ist ein häufig verwendetes Tool, das wir auch mit VBA implementieren können. In unserem früheren Artikel „VBA-Suche“ haben wir Ihnen gezeigt, wie Sie die FIND-Methode in VBA verwenden. In diesem Artikel zeigen wir Ihnen, wie Sie die VBA-Methode „Find & Replace“ verwenden.
Folgen Sie dem Artikel, um diese Technik zu lernen.
VBA Syntax suchen und ersetzen
Um die Find and Replace-Methode in VBA zu verwenden, müssen Sie die folgenden Schritte ausführen. Zuerst haben wir den Zellenbereich ausgewählt. Erwähnen Sie daher den Zellenbereich mithilfe des RANGE-Objekts in VBA.
Setzen Sie nun einen Punkt (.), Um die IntelliSense-Liste anzuzeigen.
Wählen Sie die Ersetzen-Methode aus der Liste.
Wir können die riesige Parameterliste der Replace-Methode sehen. Jetzt sehen wir jede Parametererklärung unten.
- Was: Dies ist nichts anderes als das, was wir finden müssen, um den Wert zu ersetzen.
- Ersetzen: Mit dem gefundenen Wert, durch welchen neuen Wert soll ersetzt werden.
- Betrachten: Dies ist zu erwähnen, ob wir den gesamten Inhalt oder nur den Teil des Inhalts betrachten möchten. Wir können hier zwei Parameter angeben: "xlWhole" und "xlPart".
- Suchreihenfolge: Hier wird die Suchreihenfolge angegeben, entweder Zeilen oder Spalten. Wir können hier zwei Parameter angeben: "xlByRows" und "xlByColumns".
- Übereinstimmungsfall: Der Inhalt, nach dem wir suchen, unterscheidet zwischen Groß- und Kleinschreibung oder nicht. Wenn das Argument zwischen Groß- und Kleinschreibung TRUE oder FALSE lautet.
- Suchformat : Wir können den Inhalt auch nach der Formatierung des gesuchten Werts durchsuchen.
- Format ersetzen: Wir können das eine Format auch durch ein anderes Format ersetzen.
Beispiele für das Suchen und Ersetzen von VBA in Excel
Im Folgenden finden Sie einige Beispiele für die Excel VBA-Methode zum Suchen und Ersetzen.
Beispiel 1 - VBA Suchen und Ersetzen des Wortes
Schauen wir uns das folgende Beispiel an, um die VBA-Methode zum Suchen und Ersetzen zu verstehen. Schauen Sie sich die folgenden Daten an.
Schritt 1: Erwähnen Sie zunächst den Bereich der Zellen, die wir ersetzen. In diesem Beispiel reicht der Bereich von A1 bis B15, daher lautet der Code Bereich („A1: B15“).
Code:
Sub Replace_Example1 () Range ("A1: B15") End Sub
Schritt 2: Setzen Sie nun einen Punkt, um die IntelliSense-Liste anzuzeigen.
Schritt 3: Wählen Sie die Replace-Methode aus der IntelliSense-Liste aus.
Schritt 4: Erwähnen Sie welchen Parameter als "September".
Code:
Bereich ("A1: B15"). Ersetzen Was: = "September"
Schritt 5: Als nächstes sollte "Ersetzen durch Parameter" unser neuer Wert sein, den wir durch "Dezember" ersetzen.
Code:
Bereich ("A1: D4"). Ersetzen Sie Was: = "September", Ersetzen: = "Dezember"
Ok, ab sofort alle anderen Parameter ignorieren. Führen Sie nun den VBA-Code aus, um die Ersetzungsmethode durch VBA anzuzeigen.
Es hat also den ganzen September durch das Wort "Dezember" ersetzt.
Beispiel 2 - Groß- und Kleinschreibung ersetzen
Das fortgeschrittenere Beispiel für die VBA Find & Replace-Methode verwendet die Methode zum Ersetzen der Groß- und Kleinschreibung. Für dieses Beispiel habe ich diese Beispieldaten erstellt, wie im folgenden Bild gezeigt.
Wir haben zwei Zellendaten in Großbuchstaben, "HALLO". Wo immer wir ein Kapital "HALLO" haben, sollte es durch das neue Wort "Hiii" ersetzt werden.
Schreiben Sie wie gewohnt den Code, geben Sie an, was zuerst zu finden und zu ersetzen ist.
Code:
Sub Replace_Example2 () Range ("A1: D4"). Replace What: = "HELLO", Replacement: = "Hiii" End Sub
Schreiben Sie nun für das nächste Argument, "Match Case", die Bedingung als TRUE.
Code:
Bereich ("A1: D4"). Ersetzen Sie Was: = "HALLO", Ersetzen: = "Hiii", MatchCase: = True
Führen Sie nun den Code aus. Es wird nur die Hauptstadt "HALLO" durch "Hiii" ersetzen.
Stellen Sie sich vor, Sie haben das Argument "Match Case" in VBA nicht angewendet, dann wird das gesamte "Hallo" durch "Hiii" ersetzt.
Hinweis: Ich habe das Argument Match Case hier entfernt. Standardmäßig ist der Argumentwert MATCH CASE FALSE.
Wie wir im obigen Bild sehen können, wurden alle "Hallo" -Wörter durch "hiii" ersetzt.
Wenn wir also MATCH CASE-Kriterien verwenden möchten, sollten wir das Argument als "TRUE" anwenden. Standardmäßig lautet dieser Argumentwert "FALSE". Auf diese Weise können wir die Methode „FIND & REPLACE“ verwenden, um etwas zu finden und den gefundenen Wert durch etwas anderes zu ersetzen.
