Code pour OptionButton

[lynyrd]

Bonjour le forum
dans le fichier ci-joint,par quoi faut t'il remplacer [B2] pour que à chaque saisie le choix (oui ou non) s'inscrive en colonne "B" .
Merci

 

[BOISGONTIER]

Re : Code pour OptionButton

Bonjour,

Private Sub CommandButton1_Click()
[A65000].End(xlUp).Offset(1, 0).Select
ActiveCell.Value = Me!Nom
ActiveCell.Offset(0, 1) = IIf(Me.OptionButton1, "OUI", "NON")
Nom.Value = ""
OptionButton1.Value = False
OptionButton2.Value = False
End Sub

JB
Formation Excel VBA JB

 

[lynyrd]

Re : Code pour OptionButton

Merci BOISGONTIER
Bonne Journée .