Discussion :

[Olivierporcinet]

Bonjour,

J'ai 2 listes déroulantes dans mon formulaire.

1ère : oui mandaté, non mandaté, non, inconnu

2ème : oui, non, inconnu

Je cherche la solution :

si dans la 1ère liste déroulante on sélectionne "NON", alors on ne doit rien pouvoir sélectionner dans la 2ème liste.

Des idées ?

Merci.

[Olivierporcinet]

J'ai une solution mais elle fait disparaître ma 2ème liste déroulante....

et si je sélectionne autre chose dans la 1ère liste, la 2ème n'apparaît toujours pas.

Code :

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

1
2
3
4
5
6
7
Private Sub Parcours_AAJ_AfterUpdate()
 
If Me.Parcours_AAJ = "Non" Then
 
Me.Placement.Visible = False
End If
End Sub

[tee_grandbois]

bonjour,
il est possible d'activer/désactiver la 2ème liste sur mise à jour de la 1ère (évènement AfterUpdate)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Liste1_AfterUpdate()
 
if NZ(me.Liste1.Value,"") = "NON" then
    me.Liste2.Enabled = False
else
    me.Liste2.Enabled = True
end if	
 
' ou également:
' me.Liste2.Enabled = not(nz(me.Liste1.Value,"") = "NON")
 
End Sub

il faut aussi penser à le faire en cas de changement d'enregistrement (évènement Current du formulaire)

Code :

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

1
2
3
4
5
Private Sub Form_Current()
    me.Liste2.Enabled = not(nz(me.Liste1.Value,"") = "NON")
    ' ou aussi en appelant la procédure de la liste 1
    ' Liste1_AfterUpdate	
End Sub

[Olivierporcinet]

Un super grand merci.

Bonne fin de journée