如何使用vba连接字符串？

要使用 VBA 代码连接两个字符串，必须使用 & 符号。您可以在两个字符串之间使用 & 符号来组合它们，然后将此新值分配给单元格、变量或消息框。同样，您也可以连接两个以上的值。

稍后我们会看一个简单的例子来理解它。

使用VBA连接的步骤

1. 首先使用双引号输入第一个字符串。
2. 之后，键入 & 符号。
3. 接下来，使用双引号输入第二个文本。
4. 最后，将此值分配给单元格或变量，或使用消息框查看它。

 Sub vba_concatenate() Range("A1") = "Mike" & "Ross" End Sub

用分隔符连接

您还可以通过简单地添加第三个 & 符号来在两个字符串之间使用分隔符。考虑以下代码。

 Range("A1") = "Mike" & "-" & "Ross"

在上面的代码中，您在两个字符串中使用了分隔符，并仅使用 & 符号将它们连接起来。所以基本上，每当您需要括起某些内容时，您都需要在其中使用＆符号。

使用变量连接

您还可以将值存储在变量中，然后连接这两个变量的值。考虑以下代码。

在上面的代码中，您将变量声明为变量，然后为这些变量赋值。最后，我们使用 & 符号组合三个变量，然后将结果分配给单元格 A1。

使用 VBA 连接范围

您还可以使用 VBA 连接一系列单元格中的值。考虑以下宏。

 Sub vba_concatenate() Dim rng As Range Dim i As String Dim SourceRange As Range Set SourceRange = Range("A1:A10") For Each rng In SourceRange i = i & rng & " " Next rng Range("B1").Value = Trim(i) End Sub

在上面的代码中，您使用了FOR NEXT（For 循环）来循环遍历要连接的范围。

因此，它会转到范围 (A1:A10) 中的每个单元格，将该值存储在变量 I 中，并使用 & 符号在每次迭代中连接一个值。最后，将组合通道设置为范围 B1。

以下代码连接所选范围的值。您所需要做的就是选择一个范围，然后运行代码。

 Dim rng As Range Dim i As String For Each rng In Selection i = i & rng & " " Next rng Range("B1").Value = Trim(i)

连接整列或行

如果要连接整列或整行，在这种情况下最好不要使用循环方法。您可以使用“TextJoin”工作表函数，该函数可以连接整行或整列（请考虑以下代码）。

 'join values from column A. Dim myRange As Range Dim myString As String Range("B1") = WorksheetFunction.TextJoin(" ", True, Range("A:A")) 'join values from row 1. Dim myRange As Range Dim myString As String Range("B1") = WorksheetFunction.TextJoin(" ", True, Range("1:1"))