如何使用VBA循环多个数组并显示值？

通过使用数组变量，我们可以很容易地循环多个数组并显示它们的值。以下是使用VBA代码循环多个数组并显示值的示例：

Sub LoopMulti pl eArrays()

Dim arr1() As Variant, arr2() As Variant, arr3() As Variant
Dim i As Long, j As Long, k As Long
'assign values to arrays
arr1 = Array("apple", "banana", "orange")
arr2 = Array(1, 2, 3, 4)
arr3 = Array(True, False, True)
'loop through the arrays
For i = LBound(arr1) To UBound(arr1)
    Debug.Print arr1(i)
Next i
For j = LBound(arr2) To UBound(arr2)
    Debug.Print arr2(j)
Next j
For k = LBound(arr3) To UBound(arr3)
    Debug.Print arr3(k)
Next k
End Sub
在此示例中，我们创建三个不同的数组，即arr1，arr2和arr3，并将它们分别分配给字符串，整数和布尔变量。我们使用For循环遍历每一个数组，并使用Debug.Print语句显示它们的值。
注意，您可以使用相同的for循环变量（例如i，j和k）来循环遍历多个数组。
您可以根据需要对代码进行修改，以便将值输出到工作表单元格，用户窗体框或其他位置。