如何通过vba创建带有字符串的数组？

在 VBA 中，您可以创建一个包含字符串的数组，其中每个数组元素存储一个字符串，您可以进一步访问该字符串，甚至可以将其合并为单个字符串。除此之外，您还可以将主字符串拆分为多个子字符串（使用分隔符），然后将每个子字符串存储在数组元素中。

正如我上面所说，有两种方法可以在数组中使用字符串，在本教程中，我们将了解如何为这两种方法编写代码。

带字符串的 VBA 数组

 Option Base 1 Sub vba_string_array() Dim myArray() As Variant myArray = Array("One", "Two", "Three") Debug.Print myArray(1) Debug.Print myArray(2) Debug.Print myArray(3) End Sub

1. 首先，声明一个数组，其中不包含要存储的元素数量。
2. 接下来，您需要使用VBA的ARRAY函数来设置您想要指定的值。
3. 之后，在函数中使用逗号指定所有字符串。
4. 最后，您可以使用商品编号访问所有频道。

以同样的方式，您还可以获取要存储在表中的单元格字符串。

VBA分割字符串并存储在数组中

如果您想要一个包含多个子字符串的字符串，可以使用使用分隔符的 VBA 的 SPLIT 函数来分割它。

 Option Base 1 Sub vba_string_array() Dim myArray() As String myArray = Split("Today is a good day", " ") For i = LBound(myArray) To UBound(myArray) Debug.Print myArray(i) Next i End Sub

在此代码中，您有一个字符串，它是一个五个单词的短语。当您使用 split 函数时，它将其拆分为五个不同的子字符串，然后将其存储在数组元素中。

之后，您将使用for 循环，它使用上限和下限来进行计数器循环并将每个数组元素打印到直接窗口。