Question

在excel VBA中两个或多个数组应该如何合并为一个数组？

例如：
arr1=Sheets（"sheet1"）.Range("a4:c4")
arr2=Sheets（"sheet1"）.Range("d5:f5")
arr1与arr2 如何合并为一个数组？多谢了！

Answer 1

1、首先打开电脑上的excle表格。

2、然后进入VBA的编程界面，新建一个子过程bianliang。

3、在子过程中定义一个变量，这个变量是一个数组，类型是字符串类型，有3个元素，Dim city(3) As String。

4、为数组的3个元素各自赋值city(1) = "meizhou"city(2) = "shanghai"city(3) = "guangzhou"。

5、将数组的3个元素的值打出来。MsgBox "第一个城市是" & city(1) & "第二个城市是" & city(2) & "第三个城市是" & city(3)。

6、最后选择窗口顶部菜单的“运行”按钮，就完成了。

Answer 2

Set arr1 = Sheets("sheet1").Range("a4:c4")
Set arr2 = Sheets("sheet1").Range("d5:f5")
arr3 = Union(arr1, arr2)