2013-04-09 52 views
2

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

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 

感谢,

+2

明白了。 如果有人有一天有同样的问题,只需写下'OptionButtons.Add br_FKG1'而不用括号,以便添加对象而不是值。 – 2013-04-09 07:28:43

+0

你可以添加这个作为你自己的问题的答案,然后接受它。 – 2013-04-09 10:27:49

+0

@AlexK。我看到了,但是我的声誉还不够高,所以我必须在我的问题后等待8个小时才能回答自己。谢谢 ! – 2013-04-09 12:15:57

回答

3

明白了。如果任何人有一天有相同的问题,只需写

OptionButtons.Add br_FKG1 

没有括号,以便该对象,而不是值被添加。

没有括号,它实际上是添加的类的默认属性。对于一个OptionButton,它是.Value,但它可能是其他类的其他内容。