vba - VBA - 选项按钮集合

Question

我正在尝试获取选项按钮的集合。我希望我收藏的对象具有“OptionButton”类型。有没有办法做到这一点 ？

Private Sub SetInputs()

Dim OptionButtons As Collection
Set OptionButtons = New Collection

OptionButtons.Add (br_FKG1)

' MsgBox (TypeName(br_FKG1)) : OptionButton
' MsgBox (TypeName(OptionButtons.Item(1))) : Boolean

(...)

End Sub

谢谢，

Answer 1

知道了。如果有一天有人遇到同样的问题，请写

OptionButtons.Add br_FKG1 

没有括号，以便添加对象而不是值。

没有括号，它实际上是添加的类的默认属性。对于 OptionButton，它是 .Value，但对于其他类可能是别的东西。