我有一个正在尝试创建的Visual Basic for Applications (Excel)脚本,该脚本的一部分涉及用shape对象填充数组 代码片段如下: If rw3("PROCEDURE_ID_TRUE i = i + 1
End If 每当我实际运行它时,它似乎是通过引用传递整个数组最终总是ShapeObj2的最后一个值。 <
我开始在VBA中使用类,我不明白为什么不能在我创建的类的对象中将任何值添加到名为SDA的数组中。SDA(1 To 12)
For i = 1 To 12 Next i
End Sub 而常规模块中的在名为"test“的子集的末尾,oProject.SDA(1)的值仍然是0,而不是我想要的2。 有人能帮我找出我的错误吗? 谢谢你的帮助!
我对VBA编程比较陌生,但已经用其他语言编程多年了。对于我的项目,我创建了一个名为OpsFloor的类,它应该模拟操作层。我将用户信息解析到一个数组中,并尝试将该数组(我尝试过同时传递整个数组和单个值)传递给OpsFloor对象的一个实例。我担心我对VBA中类的工作方式有一些根本性的误解。(x, y) = value下面是Excel中工作表对象sub中的调用:
O