Vba: so entfernen sie das letzte zeichen aus einer zeichenfolge
Sie können die folgende grundlegende Syntax verwenden, um mit VBA das letzte Zeichen aus einer Zeichenfolge zu entfernen:
Sub RemoveLastChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 1)
Next i
End Sub
In diesem speziellen Beispiel wird das letzte Zeichen aus jeder Zeichenfolge im Bereich A2:A11 entfernt und die Ergebnisse im Bereich B2:B11 angezeigt.
Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.
Beispiel: Verwenden von VBA zum Entfernen des letzten Zeichens aus Zeichenfolgen
Angenommen, wir haben die folgende Liste mit Namen von Basketballmannschaften in Excel:
Nehmen wir an, wir möchten das letzte Zeichen aus jedem Teamnamen entfernen.
Dazu können wir das folgende Makro erstellen:
Sub RemoveLastChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 1)
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
In Spalte B werden alle Zeichenfolgen in Spalte A angezeigt, wobei das letzte Zeichen entfernt wurde.
Wenn Sie stattdessen die letzten n Zeichen aus einer Zeichenfolge entfernen möchten, ersetzen Sie einfach die 1 in der Left- Methode durch eine andere Zahl.
Wir können beispielsweise das folgende Makro erstellen, um die letzten 2 Zeichen aus einer Zeichenfolge zu entfernen:
Sub RemoveLastTwoChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 2)
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
In Spalte B werden alle Zeichenfolgen in Spalte A angezeigt, wobei die letzten beiden Zeichen entfernt wurden.
Hinweis : Die vollständige Dokumentation für die VBA- Left- 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