VBA二维数组如何转一维数组?一维如何转二维?

如题所述

:一维转二维。

MsgBox arr1(2, 1) ‘转换后的数组是1列多行的二维数组 End Sub 2、二维数组转一维。

arr3 = Application.transpose(Application.Index(arr2, , 2)) '取得arr2第2列数据并转置成1维数组 MsgBox arr3(2,)
温馨提示:答案为网友推荐,仅供参考
相似回答