Bonjour à tous!

Dans un formulaire je cherche à alimenter un champ (liste déroulante : ch_2) en fonction du choix de la valeur d'un autre champ (liste déroulante : ch_1).

j'ai donc attribué ce code au champ ch_1 :

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
Private Sub ch_1_AfterUpdate()
 
    Dim liste As String
    Dim n As Integer
 
    'liste équivaut à la valeur selectionnée par l'utilisateur
    'n sert à connaître le numéro de la ligne sélectionnée
    n = Me.Controls!ch_1.ListIndex
 
    'Pour renvoyer la valeur de la ligne n
    liste = Me.Controls!ch_1.ItemData(n)
 
    If liste= "val1" Then                  
            Me.Controls!ch_2.Value = "etudiant"
    ElseIf liste= " " Then
        Me.Controls!ch_2.Value = "lyceen"
    End If
End Sub
Lorsque le champ "ch_1" est vide, je voudrais que la valeur de "ch_2" soit "lyceen" or mon code ne fonctionne pas et ne remplit par le champ 2 si il n'y a pas de valeur dans champ 1.
Je ne comprend pas d'ou vient mon erreur...

Merci d'avance pour votre aide!