Salut François,
Au cas où tu ne saurais pas, dans un Forum, il y a des gens qui lisent, pas que des robot sans coeur ni âme... et ces "vrais" gens se sentent bien plus disposés à rendre service quand on s'adresse à eux d'une manière polie... Et pas par une simple phrase J'ai.....blah blah...... Je Voudrai... Blah Blah... et Niet SVP, Niet Bonsoir, Niet Merci d'avance!
Tu sembles nouveau, donc je te souhaite la bienvenue dans XLD et j'espère que tu auras capté le message...
Donc pour ta question ...
On peut faire une boucle, mais l'évènement Click du Control OptionButton devrait suffir ... non ?
Sinon on peut faire un truc comme çà à partir d'un autre Control... Ici par exemple un CommandButton:
Private Sub CommandButton1_Click()
Dim Ctrl As Control
For Each Ctrl In UserForm1.Controls
If TypeOf Ctrl Is MSForms.OptionButton Then
If Ctrl.Value = True Then
MsgBox "L'Option Button qui à été coché est : " & Ctrl.Name
End If
End If
Next Ctrl
End Sub
Voilà très interressant pour le moyen de faire des boucles sur des Types de Controls précis avec MSForms...
Bonne Soirée
@+Thierry
