VBA Collection将项目添加到特定位置

Question

我想从集合中删除特定项目，然后在其位置添加不同的值。

例如：

Sub test()

Dim col As Collection
Set col = New Collection

col.Add (10)
col.Add (20)
col.Add (30)
col.Add (40)
col.Add (50)

col.Remove (3)
col.Add ("x", ,3) 'error here

End Sub

当我写col.Add行时，它说编译错误，期望：= 如果我只是写

col.Add ("x")

它的工作正常，但它将值放在最后而不是定义的位置。

感谢你的帮助，这可能是微不足道的！

Answer 1

简单地丢失括号;

col.Add "x", , 3

对于

10
20 
"x"

("x")有效，因为parens不是add调用的一部分，而是指评估"x" 因此对于任何一个单独有效（但不必要）然后将值传递给.add。