Bonjour,
J'ai un combobox qui liste les fournisseurs réunis dans 3 champs différents (impossible à changer). L'utilisateur choisit un fournisseur et j'ai dans une zone de liste les lignes contenant le fournisseur choisit qui s'affiche.
Le problème c'est que ma programmation ne va regarder que dans le champ fournisseur1. C'est-à-dire que si l'utilisateur a choisi un fournisseur présent pour une ligne dans le champ fournisseur2 ou fournisseur3 et bien les lignes satisfaisant pourtant ce choix n'apparaissent pas dans le résultat.
(vous avez sûrement reconnu un code similaire au tuto de caféine pour ceux qui connaissent
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim SQL As String SQL = "SELECT numéro, Produit, Description, [Folder],Fournisseur1 ,Prix1,Fournisseur2, Prix2, Fournisseur3, Prix3 FROM Equipement Where Equipement![Appel d'offre] <> 0 " If Me.chkfournisseur Then SQL = SQL & "And Equipement!Fournisseur1 = '" & Me.cmbfournisseur & "' " End If Me.lstresultat.RowSource = SQL Me.lstresultat.Requery
Donc voilà ma partie de code à modifier, je suis sûre que c'est très simple mais je n'arrive pas à trouver la formulation correcte, j'ai par exemple essayé:
enfin le truc de barbare mais voilà ça marche pas!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 SQLDES = "And Equipement!Fournisseur1 Or Equipement!Fournisseur2 Or Equipement!Fournisseur3 = '" & Me.cmbfournisseur & "' " SQL = SQL & SQLDES
Une idée?
Partager