Bouton de commande userform

Bonjour et bonne chance
Un exemple:
Traitement par la reconnaissance du texte des boutons ou de tout autres controles. Ce principe laisse beucoup de libertés d'adaptation.

Dans un userform il y a X optionbutton,
sur un click du premier button, les buttons de 1 à trois seront rendus invisible.


Private Sub OptionButton1_Click()

For variable = 1 To 3

For Each i In UserForm1.Controls
If i.Caption = "OptionButton" & variable Then
i.Visible = False
Exit For
End If
Next
Next
End Sub

Merci pour la solution. Tu m'as permis d'alléger considérablement mes macros.

Slt
Patrick