Bonjour à vous deux
Je me permets de répondre comme je passe sur le sujet:
Private Sub OptionButton1_Click()
EntrerCaption OptionButton1
End Sub
Sert à appeler un programme qui s'appelle EntreCaption auquel tu fournis comme objet, ton contrôle actuel
Le programme
Sub EntrerCaption(Opt As MSForms.OptionButton)
UserForm2.TextBox1.Text = Opt.Caption
'Ensuite validation enclenchant le reset de certaines cellules.
'Ici par exemple...
'...
End Sub
S'occupe ensuite d'affecter à ta Textbox1 dans ton userform2, la valeur de la propriété caption du bouton que tu as donné à la fonction.
La raison pour laquelle c'est pratique de passer par une fonction comme celle là, c'est que si tu dois l'appeler via d'autres boutons, tu n'as qu'à recopier la ligne de code EntrerCaption OptionButton1 en changeant uniquement le nom du bouton, pas besoin de recopier tout le programme que tu appelles à chaque fois, ça permet que le programme soit plus facile à modifier mais aussi à lire