Bonjour,

J'ai un userform dans lequel j'ai une checkbox1, des labels et textbox.
Je souhaite que lorsque la checkbox1 n'est pas cochée, ces labels et textbox soient invisibles ou qu'on ne puissent pas écrire dans les textbox.
Dès que la checkBox1 est cochée, les labels et textbox doivent apparaître.

Voilà ce que j'ai écris. (A l'ouverture de l'userform, les labels et textbox sont bien invisibles mais quand je coche la checkbox, ils n'apparaissent pas) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub UserForm_Activate()
 
    UserForm1.Caption = "Ajouter une benne"
 
    If CheckBox1.Value = False Then
        Label15.Visible = False
        TextBox7.Visible = False
        Label16.Visible = False
        Label17.Visible = False
        TextBox8.Visible = False
   Else
        Label15.Visible = True
        TextBox7.Visible = True
        Label16.Visible = True
        Label17.Visible = True
        TextBox7.Visible = True
    End If