vba access recherche multicritere
Bonjour tout le monde
je ne connais pas beaucoup acces, et je deloppe généralement sous excel.
j'ai voulu adapter un tutoriel écris par caféine
http://cafeine.developpez.com/access...echerchemulti/
et ça ne marche pas. es ce quelquen pourrait me donner un petit coup de main.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Private Sub ACTUALISER()
Dim SQL As String
SQL = "SELECT N°, TYPE, TECHNOLOGIE, Ømm, RAYON, SERIE, FOURNISSEUR, REFERENCE, PRIX UNITAIRE HT, QUANTITE FROM OUTILS Where OUTILS!N° <> 0 "
If Me.Cochertype Then
SQL = SQL & "And OUTILS!TYPE = '" & VARIABLETYPE & "' "
End If
If Me.CocherØ Then
SQL = SQL & "And OUTILS!Ømm like '" & VARIABLEØ & "' "
End If
If Me.Cocherfournisseur Then
SQL = SQL & "And OUTILS!FOURNISSEUR = '" & VARIABLEFOURNISSEUR & "
End If
SQL = SQL & ";"
Me.RESULTATS.RowSource = SQL 'cette ligne je pense n'est pas prise en compte
Me.RESULTATS.Requery
End Sub |
en fait le code se déroule normalement, et la listebox devrait afficher la liste filtrée, mais elle reste vierge. et je ne trouve pas. je pense que ça tient a la formulation de SQL, ouimézou?:mrgreen:
merci d'avance de me dire ou je me plante, ou du moins ou es l'erreur
