Checkbox et liste deroulante

[samkriss]

Bonjour a tous,

Je suis a la recherche d'une solution pour que lorsqu0'une checkbox est cochee, alors une liste deroulante aparaisse et disparaisse si la checkbox est decochee.

Merci de votre aide.

Samkriss

 

[samkriss]

Re : Checkbox et liste deroulante

Je sais comment faire pour afficher du texte ou le contenu d'une cellule, mais pas faire appelle a une liste deroulante.

 

[Pierrot93]

Re : Checkbox et liste deroulante

Bonjour samkriss

pour des controles placés sur un USF, essaye peut être comme ceci :

Private Sub CheckBox1_Click()
ComboBox1.Visible = CheckBox1
End Sub

@+

 

[samkriss]

Re : Checkbox et liste deroulante

Merci Pierrot,

Mais je ne travail pas sur un USF, mais dans une feuille de calcule.

 

[Pierrot93]

Re : Checkbox et liste deroulante

Re,

et quels types de contrôles, boite à outils controles ou barre d'outils formulaire.... et quelle liste déroulante...

 

[samkriss]

Re : Checkbox et liste deroulante

Re,

et quels types de contrôles, boite à outils controles ou barre d'outils formulaire.... et quelle liste déroulante...

Tu es trop rapide, j'avais pas encore eu le temps de mettre mon fichier en ligne.

Il faut regarder sur la ligne 16, c'est elle qui m'interesse

 

[Pierrot93]

Re : Checkbox et liste deroulante

Re

essaye ceci :

Sub CheckBox4_Click()
    If ActiveSheet.Shapes("Check Box 4").DrawingObject.Value = 1 Then
        ActiveSheet.Shapes("Drop Down 6").Visible = True
    Else
       ActiveSheet.Shapes("Drop Down 6").Visible = False
    End If
End Sub

@+

 

[samkriss]

Re : Checkbox et liste deroulante

Tout est nickel comme toujours,

merci de cette reponse aussi rapide

a bientot

samkriss