So verketten sie zeichenfolgen in vba (mit beispielen)
Sie können die folgenden Methoden verwenden, um Zeichenfolgen in VBA zu verketten:
Methode 1: Zwei Zeichenfolgen verketten
SubConcatStrings ()
Range(" C2 ") = Range(" A2 ") & Range(" B2 ")
End Sub
In diesem Beispiel werden die Zeichenfolgen in den Zellen A2 und B2 verkettet und das Ergebnis in Zelle C2 angezeigt.
Methode 2: Verketten Sie zwei Zeichenfolgen mit einem Trennzeichen
SubConcatStrings ()
Range(" C2 ") = Range(" A2 ") & " " & Range(" B2 ")
End Sub
In diesem Beispiel werden die Zeichenfolgen in den Zellen A2 und B2 mit einem Leerzeichen zwischen den Zeichenfolgen verkettet und das Ergebnis in Zelle C2 angezeigt.
Methode 3: Verketten Sie zwei Spalten mit einem Trennzeichen
SubConcatStrings ()
Dim i As Integer
For i = 2 To 6
Cells(i, 3).Value = Cells(i, 1) & " _ " & Cells(i, 2)
Next i
End Sub
In diesem Beispiel werden die Zeichenfolgen in den Bereichen A2:A6 und B2:B6 mit einem Unterstrich zwischen den Zeichenfolgen verkettet und die Ergebnisse in den Zellen C2:C6 angezeigt.
Die folgenden Beispiele zeigen, wie jede dieser Methoden in der Praxis angewendet werden kann.
Beispiel 1: Zwei Zeichenfolgen verketten
Wir können das folgende Makro erstellen, um zwei Zeichenfolgen zu verketten:
SubConcatStrings ()
Range(" C2 ") = Range(" A2 ") & Range(" B2 ")
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Beachten Sie, dass die Zeichenfolgen aus den Zellen A2 und B2 in Zelle C2 verkettet wurden.
Beispiel 2: Verketten Sie zwei Zeichenfolgen mit einem Trennzeichen
Wir können das folgende Makro erstellen, um zwei Zeichenfolgen mit einem Leerzeichen als Trennzeichen zu verketten:
SubConcatStrings ()
Range(" C2 ") = Range(" A2 ") & " " & Range(" B2 ")
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Beachten Sie, dass die Zeichenfolgen in den Zellen A2 und B2 mit einem Leerzeichen dazwischen verkettet wurden und das Ergebnis in Zelle C2 angezeigt wird.
Beispiel 3: Verketten Sie zwei Spalten mit einem Trennzeichen
Wir können das folgende Makro erstellen, um Zeichenfolgen in zwei Spalten mit einem Unterstrich als Trennzeichen zu verketten:
SubConcatStrings ()
Dim i As Integer
For i = 2 To 6
Cells(i, 3).Value = Cells(i, 1) & " _ " & Cells(i, 2)
Next i
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Beachten Sie, dass die Zeichenfolgen im Bereich A2:A6 und B2:B6 mit einem Unterstrich dazwischen verkettet wurden und die Ergebnisse im Bereich C2:C6 angezeigt werden.
Zusätzliche Ressourcen
Die folgenden Tutorials erklären, wie Sie andere häufige Aufgaben in 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