affichage listbox selon valeur checkbox

[la gigogne]

Bonjour les EXCELlons,

Malgré tous mes efforts pour devenir un excellent programmateur, 🙂

je bloque au pied de la montagne 😕

Je souhaite afficher une listbox en fonction de la valeur False ou True d'une checkBox

Private Sub AffichageReliquat_Click()
If CheckBoxReliquat.Value = True Then
TextBoxReliquat.Visible = True
ElseIf CheckBoxReliquat.Value = False Then
TextBoxReliquat.Visible = False
ElseIf CheckBoxReliquat.Value = Null Then
TextBoxReliquat.Visible = False
Else
End If
End Sub



Mon code ne me parait pas si mal que ça mais ça coince.

Merci pour votre aide.

Je sais que c'est un problème simplissime mais je n'ai pas trouvé de solution dans les anciens fils.

Merci.

 

[Pierrot93]

Re : affichage listbox selon valeur checkbox

Bonjour,

pas ouvert ton fichier, mais regarde peut être ceci :

Private Sub CheckBox1_Change()
TextBox1.Visible = IIf(IsNull(CheckBox1), 0, CheckBox1)
End Sub

bon après midi
@+

 

[la gigogne]

Re : affichage listbox selon valeur checkbox

SUPER !!

ça marche exactement comme je le souhaitais et sans fioriture.

Le seul point, c'est que je comprend bien le principe

Private Sub CheckBox1_Change()
TextBox1.Visible = IIf(IsNull(CheckBox1), 0, CheckBox1)
End Sub

Mais je comprend mal la méthode IIf Peut tu m'en dire plus Pierrot ?

Sinon merci beaucoup. En 2 mn. tu as résolu 2 h 30 de recherche.

 

[Pierrot93]

Re : affichage listbox selon valeur checkbox

Re,

permet de gérer le 3ème état du "checkbox", pour renvoyer "false" le cas échéant, sinon on s'occupe de la valeur du checkbox, vrai ou faux....

 

[la gigogne]

Re : affichage listbox selon valeur checkbox

Je vais avoir encore besoin de toi Pierrot.

Ta formule marche très bien pour afficher une listbox lorsque la checkbox a une valeur true.

Seulement, je souhaite faire sur une autre listbox l'inverse, c'est à dire masquer une listbox lorsque la valeur de la checkbox
est définie sur true

J'ai essayé de modifier les paramètres de ta formule en renvoyant 0 au 3ème argument et checkbox1 au 2ème mais ça ne marche pas.

Peux tu m'aider ?

 

[Pierrot93]

Re : affichage listbox selon valeur checkbox

Bonjour,

essaye peut être tout simplement ainsi :

TextBox1.Visible = Not CheckBox1

en espérant que le "3ème état" soit bien géré....
bon après midi
@+

 

[Pierrot93]

Re : affichage listbox selon valeur checkbox

Re,

essaye plutôt ceci, si tu utilises la propriété "triplestate" de la "checkbox" :

Option Explicit
Private Sub CheckBox1_Change()
TextBox1.Visible = IIf(IsNull(CheckBox1), -1, Not CheckBox1)
End Sub

 

[la gigogne]

Re : affichage listbox selon valeur checkbox

Super Pierrot !!!

ça fonctionne parfaitement !!!

Et j'ai trouvé de l'aide sur la méthode IIf que tu m'as montré.


Private Sub CheckBox1_Change()
TextBox1.Visible = IIf(IsNull(CheckBox1), -1, Not CheckBox1) 1er argument expression 2ème if false 3ème if true
End Sub

Donc je comprend mieux le 0 et -1

0 true -1 false

C'est ça qu'on appelle le codage en dur ???

 

[Pierrot93]

Re : affichage listbox selon valeur checkbox

Bonjour,

0 true -1 false

Aarf, c'est l'inverse, 0 = False et -1 = True...

bonne journée
@+