VBA Suchen und Ersetzen

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 ersetzt werden soll.
  • 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 für Zeilen oder Spalten angegeben. 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.

Sie können diese VBA-Excel-Vorlage zum Suchen und Ersetzen hier herunterladen - VBA-Excel-Vorlage 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 zuerst 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 Sie What: = "September"

Schritt 5: Weiter Ersetzen durch Parameter sollte unser neuer Wert sein, den wir durch "Dezember" ersetzen.

Code:

Bereich ("A1: D4"). Ersetzen Sie Was: = "September", Ersetzen: = "Dezember"

Ok, ignoriere ab sofort alle anderen Parameter. Führen Sie nun den VBA-Code aus, um die Ersetzungsmethode durch VBA anzuzeigen.

So hat es 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. In diesem Beispiel habe ich diese Beispieldaten wie im folgenden Bild gezeigt erstellt.

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 zu finden und was zuerst 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, der nur das Großbuchstaben "HALLO" durch "Hiii" ersetzt.

Stellen Sie sich vor, Sie haben das Match Case-Argument in VBA nicht angewendet, dann wird das gesamte "Hallo" durch "Hiii" ersetzt.

Hinweis: Ich habe das Match Case-Argument hier entfernt. Standardmäßig ist der Argumentwert für 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.