So verwenden sie substitute in vba (mit beispiel)

Sie können die Substitute()- Methode in VBA verwenden, um alle Vorkommen eines bestimmten Textes in einer Zeichenfolge durch neuen Text zu ersetzen.

Diese Methode verwendet die folgende grundlegende Syntax:

Ersetzen (Text, Old_text, New_text, Instance_num)

Gold:

• Text : Der Text, in dem Sie Zeichen ersetzen möchten
• Old_text : Der zu ersetzende Text
• Neuer_Text : Der Text, der als Ersatz verwendet werden soll
• Instanznummer ( optional ) : welche Instanz des alten Textes ersetzt werden soll. Wenn keine angegeben wird, werden alle Vorkommen des alten Textes ersetzt.

Die folgenden Beispiele zeigen, wie Sie diese Methode in der Praxis anwenden können.

Beispiel: Verwendung von Substitute in VBA

Angenommen, wir haben die folgende Liste von Ausdrücken in Excel:

Angenommen, wir möchten stattdessen jedes Leerzeichen in jeder Zelle durch ein Komma ersetzen.

Dazu können wir das folgende Makro erstellen:

 Sub SubstituteText()

Dim rng As Range, cell As Range
Set rng = Range(" A2:A9 ")

For Each cell In rng
    cell = WorksheetFunction.Substitute(cell, " ", ",")
Next
    
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass jedes Leerzeichen in jeder Zelle in Spalte A durch ein Komma ersetzt wurde.

Beachten Sie, dass wir auch die folgende Syntax verwenden könnten, um jedes Leerzeichen durch nichts zu ersetzen:

 Sub SubstituteText()

Dim rng As Range, cell As Range
Set rng = Range(" A2:A9 ")

For Each cell In rng
    cell = WorksheetFunction.Substitute(cell, " ", "")
Next
    
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass jedes Leerzeichen in jeder Zelle in Spalte A durch nichts ersetzt wurde.

Mit anderen Worten: Wir haben alle Leerzeichen aus jeder Zelle in Spalte A entfernt.

Hinweis : Die vollständige Dokumentation zur VBA- Substitute- Methode finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben mit VBA ausführen:

VBA: So zählen Sie das Vorkommen von Zeichen in einer Zeichenfolge
VBA: So überprüfen Sie, ob eine Zeichenfolge eine andere Zeichenfolge enthält
VBA: So zählen Sie Zellen mit bestimmtem Text