Discussion :

[maxime40]

Voila j,ai creer un combolistbox pour filtrer un formulaire et tout fonctionne bien si l'utilistaeur selectionne un item ou plusieurs cependant si il ne le fait pas et clique immediatement sur le bouton rechercher il y a un message d'erreur qui apparait IN operator without () in query expression ClasseArticle.RéfClasse IN)'

Alors je cherche donc un code qui verifierai qu'une selection a bien été fait dans le comboxlist avant de continuer l,execution qui crée la requete pour filtrer le formulaire

[Dolphy35]

Bonsoir,

il suffit de tester si ta liste est nulle ou non :

Code :

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

1
2
3
4
5
If IsNull(Me.Liste1) Then
    MsgBox "Ok"
Else
    MsgBox "Nok"
End If

Dolphy

[maxime40]

Non ca ne fonctionne pas . ca ne fait que confirmer qu'il y a des donner dans ma listbox ca ne me dit pas si il y a un élément qui a ete bel et bien ete selectionner.

[Dolphy35]

pourtant si

Code :

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

1
2
3
4
5
6
If IsNull(Me.Liste1) Then
    MsgBox "pas selection liste"
Else
    MsgBox "selection liste"
 
End If

[maxime40]

Non, je suis désolé mais j'ai essayé ton code et ca ne fonctionne pas pour résoudre le probleme que j'avais soumis. Ton code ne fait qu'indiquer qu'il y a des éléments dans une liste ou pas .

voici le code qui fonctionne

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
20
Private Sub Commande4_Click()
On Error GoTo Err_Commande4_Click
Dim db As Database
Dim qdf As QueryDef
Dim strSQL As String, strWhere As String
Dim i As Integer
 
Set db = CurrentDb
 
For i = 0 To Liste0.ListCount
    If Liste0.Selected(i) = True Then        'verifier si item selectionner            
     GoTo DEBUT
 
  Else
       MsgBox "vous devez faire au moins une selection avant de cliquer sur le bouton recherche"
      GoTo Exit_Commande4_Click   ' sinon sortir  et envorer
    End If
Next
 
DEBUT:

[Dolphy35]

Non, je suis désolé mais j'ai essayé ton code et ca ne fonctionne pas pour résoudre le probleme que j'avais soumis. Ton code ne fait qu'indiquer qu'il y a des éléments dans une liste ou pas .

par curiosité regarde la bbd jointe !