Discussion :

[JessieCoutas]

Bonjour,

J'ai deux checkbox, l'une dans la feuille1, l'autre dans la feuille2.
Je souhaite que la checkbox de la feuille2 ne soit visible que si la checkbox de la feuille1 est cochée.

Je n'y arrive pas, voici ce que j'ai écris:

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
18
19
Private Sub CheckBox1_Click()
 
 
        If CheckBox1.Value = True Then
 
        Sheets("2").Activate
        CheckBox1.Visible = True
 
        Sheets("1").Select
 
        Else
        Sheets("2").Activate
        CheckBox1.Visible = False
 
        Sheets("1").Select
 
        End If
 
End Sub

Merci de m'aider.

Le fichier joint ultra simplifié:

[Krovax]

Bonjour,
Mon avis le select est dans 99,99% des cas à bannir et ca tombe bien tu es dans ce cas alors il te suffit de les virer!
En plus il me semble t'avoir dit que tu ne pouvais pas activer un onglet avec un code dans un autre onglet, enfin c'est surtout que tu continuera a travailler sur les objet de la feuille qui contient le code!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub CheckBox1_Click()
 
 
        If CheckBox1.Value = True Then
 
        Sheets("2").CheckBox1.Visible = True
 
 
        Else
        Sheets("2").CheckBox1.Visible = False
 
        End If
 
End Sub

plus simple car le checkbox1 vau soit vrai soit faux pas besoin de if tu utilise directement ca valeur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CheckBox1_Click()
Sheets("2").CheckBox1.Visible = CheckBox1.Value 
end sub

[mercatog]

Dans ta feuille "1"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CheckBox1_Click()
Sheets("2").CheckBox1.Visible = CheckBox1.Value
End Sub

Edit: Bonjour Krovax, Désolé pas rafraichi

[JessieCoutas]

Merci aussi pour les conseils, je vais essayer de m'en rappeler.