Private Sub CheckBox1_Change()
Select Case CheckBox1.Value
Case True: CheckBox2.Locked = True
Case False: CheckBox2.Locked = False
End Select
End Sub
Private Sub CheckBox2_Change()
Select Case CheckBox2.Value
Case True: CheckBox1.Locked = True
Case False: CheckBox1.Locked = False
End Select
End Sub
Ah bon ? Je ne vois vraiment pas ce que vient faire ici la propriété Locked !Merci pour la réponse c'est nickel
Private Sub CheckBox1_Change()
CheckBox2 = Not CheckBox1
End Sub
Private Sub CheckBox2_Change()
CheckBox1 = Not CheckBox2
End Sub
Bonjour JobBonjour chaelie2015, Eric C,
Ah bon ? Je ne vois vraiment pas ce que vient faire ici la propriété Locked !
Ceci est assez évident :
Mais il serait plus logique d'utiliser 2 OptionButtons : pas besoin de macros.VB:Private Sub CheckBox1_Change() CheckBox2 = Not CheckBox1 End Sub Private Sub CheckBox2_Change() CheckBox1 = Not CheckBox2 End Sub
A+
Pourriez-vous, je vous prie, regarder au post ci-près. Je vous saurais gré.
Ici