Option bouton

[maval]

Bonjour

Je cherche le moyen pour :
Si Option buton1 est coché je peut écrir sur les cellules "J5:J16" mais pas dans les cellules "N5:N16"
Si Option buton2 est coché je peut écrir sur les cellules "N5:N16" mais pas dans les cellules "J5:J16"

Merci de votre aide

Un fichier valant mieux qu'un long discours, veuillez voir la pièce jointe.

Cordialement

Maval

 

[Compte Supprimé 979]

Re : Option bouton

Bonjour Maval,

Un exemple de ce que tu peux faire 😉

A+

 

[Dull]

Re : Option bouton

Salut maval , le Forum

Un essai avec ces codes

Private Sub OptionButton1_Click()
Feuil1.Protect , UserInterFaceOnly:=True
Range("J5:J16").Locked = IIf(OptionButton2, True, False)
Range("N5:N16").Locked = IIf(OptionButton1, True, False)
End Sub

Private Sub OptionButton2_Click()
Feuil1.Protect , UserInterFaceOnly:=True
Range("J5:J16").Locked = IIf(OptionButton2, True, False)
Range("N5:N16").Locked = IIf(OptionButton1, True, False)
End Sub

EDITION: Salut Bruno 🙂 Pas rafraichit

Bonne Journée

 

[maval]

Re : Option bouton

Bonjour Dull, Bruno

Je vous remercie Nickel

Bonne journée

Max