VBA - Collection OptionButton

J'essaie d'obtenir une collection de boutons d'option. Je voudrais que les objets de ma collection aient le type "OptionButton". Y-a-t-il un moyen de faire ça ?VBA - Collection 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

Merci,

Source

2013-04-09 Marie D.

Vous l'avez. Si quelqu'un a le même problème un jour, il suffit d'écrire 'OptionButtons.Add br_FKG1' sans les parenthèses pour que l'objet et non la valeur soit ajoutée. –

Vous pouvez ajouter ceci comme réponse à votre propre question, puis l'accepter. –

@AlexK. J'ai vu cela, mais ma réputation n'est pas encore assez élevée, alors je dois attendre 8 heures après ma question pour me répondre. Merci ! –

Got it. Si quelqu'un a sans les parenthèses afin que l'objet et non la valeur est ajoutée le même problème un jour, il suffit d'écrire

OptionButtons.Add br_FKG1

Sans parenthèses, il s'agit en fait de la propriété par défaut de la classe ajoutée. Pour un OptionButton, c'est .Value, mais cela peut être quelque chose d'autre pour les autres classes.

Source

2013-04-09 12:29:31

VBA - Collection OptionButton

Répondre

Questions connexes