vba 判断是一维数组还是二维数组

如题所述

推荐答案推荐于2016-01-05

没有直接的函数，一般用变通的方法，用错误获取

Option Explicit
Sub A_num()
    On Error Resume Next
    Dim a As Variant, ln As Long
    'a = Array(1, 2, 4, 5)
    a = [{1,3,4;1,3,5}]
    ln = UBound(a, 2)
    If Err Then
        MsgBox "一维数组"
    Else
        MsgBox "二维数组"
    End If
End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：http://33.wendadaohang.com/zd/WhdB055P0hRc5PPW4c.html

相似回答

VBA代码,到底哪里出错了,说是下标越界答：3.当arr1不是数组的时候，你这样调用就越界了：arr1(j)。即便arr1是数组，你这样调用也会越界，因为arr1它是一个“二维数组”，不能像一维数组那样使用。也就是说不管arr1是不是数组，arr1(j)都是越界的。4.因为arr1和arr2都是同样大小的，只是一个表示一列数据，另一个表示一行数据。所以res...

VBA数组问题:为什么一维数组要用二维数组的方式才能调用答：因为你引用的是一个区域，.value可以省略，直接通过range创建的数组是2维的。就算只有1列，他也是个2维数组，不会因为只有1列就自动转换为1维数组。midarr(33,1)表示的是你引用区域里的第33行，第1列（虽然他只有1列）。

vba 输出数组变量值到立即窗口答：对于一维数组 可以用 Debug.Print Join(arr, ",")输出到立即窗口对于二维数组 For i = LBound(arr) To UBound(arr)Debug.Print Join(WorksheetFunction.Index(arr, i, 0), ",")Next 多维数组依次类推

大家正在搜

一维数组和二维数组二维数组转化为一维数组二维数组与一维数组的区别 vba一维数组一维数组二维数组 c语言一维数组二维数组赋值二维数组定义