Case à cocher

Bonjour,

J'ai une liste avec trois case à cocher. Je souhaiterais que lorsque j'en sélectionne une les 2 autres disparaissent et dès que je la décoche elle réapparaissent. Je n'arrive pas à trouver la solution.

'D'avance un grand merci

Bonjour,

Attention à ne pas poster plusieurs fois le même message ...

Bonjour,

Un fichier exemple serait plus facile

Amicalement

Pierrot

Private Sub OptionButton1_Click()
' Option Inhumation
If OptionButton1.Value = True Then Button 2,3.Visible = True ': DTPicker1.Width = 84: Label50.Visible = False: DTPicker3.Width = 0
TextBox10.Text = "Inhumation"
End Sub
Private Sub OptionButton2_Click()
' Option Crémation
If OptionButton2.Value = True Then Button 1,3.Visible = False ': DTPicker1.Width = 0: Label50.Visible = True: DTPicker3.Width = 84
TextBox10.Text = "Crémation"
End Sub
Private Sub OptionButton3_Click()
' Option Inhumation
If OptionButton3.Value = True Then Button1,2.Visible = True 
1,
End Sub

Merci James, c'est encore parfait pour mes archives

Bisous

Pierrot

Rechercher des sujets similaires à "case cocher"