如何在 VBA 中使用多维变量

编程问答 2022-05-03

问题描述

我无法访问存储在多维 Variant 中的值。 这是我的代码：

Sub test()

Dim vari() As Variant
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets(1)

ReDim vari(33,5)
vari = ws.UsedRange.Value
vari = WorksheetFunction.Transpose(vari())

WorksheetFunction.Average(vari(1))

End Sub

这是我的文件： excel table

当我运行这段代码时，我在最后一行出现错误，告诉我“索引不属于选择”。

但 vari(1) 似乎是间谍部分的东西。 spy section

我知道我可以使用 Range 对象直接计算平均值，在这种情况下，值存储在该对象中。为了这篇文章的目的，我简化了情况，但在我的项目中，我有多个工作簿和子集，使用 Variant 来存储值对我来说更容易。

非常感谢任何帮助

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excelexcelvariantvariantvba