[VBA]ArrayRectangular中的怪事

scottwang

在下列程序中, 红字的部份如改为3,1时无法正常阵列. 请教原因和解决的方法. 谢谢. Dim numberOfRows As Long
Dim numberOfColumns As Long
Dim numberOfLevels As Long

Dim distanceBwtnRows As Double
Dim distanceBwtnColumns As Double
Dim distanceBwtnLevels As Double

numberOfRows = 1
numberOfColumns = 3
numberOfLevels = 4
distanceBwtnRows = 150
distanceBwtnColumns = 250
distanceBwtnLevels = 18

Dim retObj As Variant
retObj = boxObj.ArrayRectangular(numberOfRows, numberOfColumns, _
numberOfLevels, distanceBwtnRows, distanceBwtnColumns, distanceBwtnLevels)

雪山飞狐_lzh

对象模型的Bug 建议用Copy＋Move改写ArrayRectangular

crazylsp

对象模型的Bug 建议用Copy＋Move改写ArrayRectangular

如何修改阵列