第一部分:先看下excel中index的用法
第二部分:现在vba中用:application.index 用法
index函数:
调用该工作表函数可以把二维数组的某一列或某一行截取出来,构成一个新的数组。
Application.Index(二维数组,0,列数)) → 返回二维数组
Application.Index(二维数组,行数,0)) → 返回一维数组
例:把A2:D6的第一列写入arr1,第四行写入arr2。
Sub t3()
Dim arr, arr1, arr2
arr = Range("A2:D6")
arr1 = Application.Index(arr, , 1)
arr2 = Application.Index(arr, 4, 0)
End Sub
运行结果:arr1
arr2:
备注:后续有需要,我会再补充进来