vba 打印出一个三维数据

【问题标题】：vba print out an three dimension datavba 打印出一个三维数据
【发布时间】：2016-06-22 12:26:57
【问题描述】：

如何在不知道其精确大小的情况下显示 3 维数组？如果变量名是DataSet。但我不确定高度和长度。在宏中，

msgbox(DataSet) 'type mismatch
msgbox(DataSet(0,0,0))'subscript out of range

或给出一般的例子。感谢您的帮助，谢谢。

【问题讨论】：

您希望它如何显示？如果不明确告诉它如何显示，3 维数组很难在 2 维屏幕上显示

标签： arrays excel vba printing

【解决方案1】：

您始终可以像这样嵌套For 循环：

For d1 = 0 to Ubound(myArray,1)
    For d2 = 0 to UBound(myArray,2)
        For d3 = 0 to UBound(myArray, 3)
            sValue = sValue & vbNewLine & myArray(d1, d2, d3)
        Next
    Next
Next
MsgBox sValue

【讨论】：

我想把0换成Lbound(myArray,1),Lbound(myArray,2),Lbound(myArray,3)。