Macro avec boîtes de contrôle

[jozerebel]

Bonjour à tous,

Voilà un code affecté à une case à cocher... J'ignore pourquoi, mais il ne fonctionne pas : Il ne me décoche pas les autres cases à cocher et ne supprime pas la valeur des cellules...


Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then CheckBox3.value = False and CheckBox4.Value = False and Range("F18").Clear and Rows("20:21").Hidden = True Else: Rows("20:21").Hidden = False


End Sub


Des idées?

D'avance merci pour votre aide.

 

[soenda]

Re : Macro avec boîtes de contrôle

Bonjour le fil, joserebel

Par exemple:

If CheckBox1.Value = True Then 
  CheckBox3.value = False 
  CheckBox4.Value = False 
  Range("F18").Clear
end if
 
Rows("20:21").Hidden = CheckBox1.Value

A plus

 

[jozerebel]

Re : Macro avec boîtes de contrôle

Merci bcp!!!!

Bon dimanche!