Vba: so entfernen sie leerzeichen aus einer zeichenfolge
Sie können die folgende grundlegende Syntax verwenden, um mithilfe von VBA Leerzeichen aus einer Zeichenfolge zu entfernen:
SubRemoveSpaces ()
Dim i As Integer
For i = 2 To 8
Range(" B " & i) = Replace(Range(" A " & i), " ", "")
Next i
End Sub
In diesem speziellen Beispiel werden Leerzeichen aus jeder Zeichenfolge im Bereich A2:A8 entfernt und die Ergebnisse im Bereich B2:B8 angezeigt.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: Verwenden von VBA zum Entfernen von Leerzeichen aus Zeichenfolgen
Angenommen, wir haben die folgende Liste von Zeichenfolgen in Excel:
Angenommen, wir möchten Leerzeichen aus jeder Zeichenfolge entfernen.
Dazu können wir das folgende Makro erstellen:
SubRemoveSpaces ()
Dim i As Integer
For i = 2 To 8
Range(" B " & i) = Replace(Range(" A " & i), " ", "")
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
In Spalte B werden alle Zeichenfolgen in Spalte A ohne Leerzeichen angezeigt.
Hinweis : Die vollständige Dokumentation zur VBA- Replace -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