mxqchina

vba数组2维转一维

已有 2184 次阅读2013-2-24 12:03 |个人分类:vba| vba, 数组, transpose, 一维, 二维

经常看到大家在vba中用transpose，始终以为就是把列数组转为行数组，看了些教程，才发现：

原来如下的arr数组是一个2维数组，即一个10行1列的2维数组，用transpose转换后，彻底变成了一个一维数组。

而

VBA.Join

VBA.Filter

VBA.Split

这三个常用数组用函数，只支持一维数组，所以必须转换。

同时发现本地窗口太好用了，配合F8，是调试程序的利器。

Sub cc()

arr = [a1:a10]

MsgBox UBound(arr, 1)

MsgBox UBound(arr, 2)

arr2 = Application.WorksheetFunction.Transpose(arr)

MsgBox UBound(arr2, 1)

MsgBox UBound(arr2, 2)'返回错误值。

End Sub

GMT+8, 2024-4-27 10:27 , Processed in 0.032909 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！本站特聘法律顾问：李志群律师

		自动登录	找回密码
密码			免费注册