XL 2016 liste deroulante et checkbox VBA

[melltel]

bonjour,
SVP je ne parviens pas a trouver une solution malgres les exemples deja fait ici.
enfet je veux conditionner l'affichage ou visibilité des listes deroulantes avec les checkbox s'ils sont cochés.
donc si on coche les checkbox, sa rend visible la liste deroulante si non, la liste reste grissé(impossible de la séléctionnée)
mais ce que j'ai fait ne marche pas!
SVP quelq'un peut me dépanner?

Private Sub OK2_Change()
If CheckBox1Tribord.Value & CheckBox2Babord.Value Then
Liste_quantité_sortie_drisses_Tribord.Enable = True & Liste_quantité_sortie_drisses_Babord.Enable = True
Else
Liste_quantité_sortie_drisses_Tribord.Enable = False & Liste_quantité_sortie_drisses_Babord.Enable = False
End If

End Sub

 

[youky(BJ)]

Bonjour Melltel,
Je verrais mieux ainsi.
Bruno

Private Sub OK2_Change()
If CheckBox1Tribord.Value=true and  CheckBox2Babord.Value=true Then
Liste_quantité_sortie_drisses_Tribord.Enable = True
Liste_quantité_sortie_drisses_Babord.Enable = True
Else
Liste_quantité_sortie_drisses_Tribord.Enable = False
Liste_quantité_sortie_drisses_Babord.Enable = False
End If
End Sub

 

[melltel]

Bonjour Melltel,
Je verrais mieux ainsi.
Bruno

Private Sub OK2_Change()
If CheckBox1Tribord.Value=true and  CheckBox2Babord.Value=true Then
Liste_quantité_sortie_drisses_Tribord.Enable = True
Liste_quantité_sortie_drisses_Babord.Enable = True
Else
Liste_quantité_sortie_drisses_Tribord.Enable = False
Liste_quantité_sortie_drisses_Babord.Enable = False
End If
End Sub

Merci youky mais xa ne prend pas. j'essaie de détacher cette partie de mon projet afin de vous presenter un fichier excel