Discussion :

[odidi]

Bonjour
je suis entrain de créer un formulaire de recherche juste par quelque lettre qui sont dans une liste déroulante. Et le résultat doit étre afficher sur un sous formulaire.
Quelqu'un a t-il une idée de comment on fait sa s'il vous plait?
Merci

[brice45]

Bonjour,

Ce sujet est abordé ici :
http://loufab.developpez.com/tutorie...ss/recherche1/

et plus précisément :
http://loufab.developpez.com/tutorie...recherche1/#LV

[odidi]

ah wii j'ai vu ce tuto mais je me demandais est ce qu'il n'y a pas plus simple que cette méthode la??

[odidi]

Il ya toujour personne pour m'aider j'ai essayé ce code mais il ne marche pas s'il vous plait j'en ai vraiment besoin.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Modif2_Enter()
Dim strSQL As String
Dim strcrit As String
Dim nom_composant As String
 
'Définition du critère
strcrit = "Composant.nom_composant LIKE  Me![*modif2*] "
strSQL = "SELECT Composant.Nom_composant, Composant.Id_composant, Composant.Nom_sous_famille, Composant.Nom_famille, Composant.[Nom_sous_famille 2], Composant.Id_Fabricant, Composant.Nom_fabricant, Composant.id_Boitier, Composant.Nom_boitier, Composant.[Nombre e pins], Composant.Datasheet" & vbCrLf
strSQL = strSQL & "FROM Composant" & vbCrLf
strSQL = strSQL & "WHERE  & strcrit & ;"
sous_form_comp.Form.RecordSource = strSQL
End Sub

[FreeAccess]

Bonjour

...créer un formulaire de recherche juste par quelque lettre qui sont dans une liste déroulante

... peut-être qu'avec un peu plus de précision sur ce que tu souhaites réellement faire . . . . car pour moi, ta demande n'est pas très claire

A quoi te sers ta Zone de liste déroulante

En fait, ne souhaites tu pas simplement saisir la ou les premières lettres (dans une Zone de texte) et que ton sous-formulaire affiche uniquement les données commençant par cette ou ces lettres

[odidi]

Euh non pas vraiment parce dans la zone de liste si tu met just une lettre des elements qui y sont il t'affiche les informations dans le sous formulaire.

Moi ce k je veux c'est pas mettre le début mais par exemple comme sur une requete SQL si on veut chercher tout les noms ou il y a 33 on met d'habitude *33* c'est sa que je veux faire je ne sais pas si je me suis fait comprendre ou pas?

[FreeAccess]

Bonjour,

Sans avoir trop vérifié ton code . . . mais déjà quelques modifications s'imposent ...

au lieu de.....

Code :

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

1
2
3
4
5
'Définition du critère
strcrit = "Composant.nom_composant LIKE  Me![*modif2*] "
...
...
strSQL = strSQL & "WHERE  & strcrit & ;"

remplacer par.....

Code :

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

1
2
3
4
5
'Définition du critère
strcrit = "Composant.nom_composant Like ""*" & Me.modif2 & "*"""
...
...
strSQL = strSQL & "WHERE " & strcrit & ";"

Moralité..... lire, relire et comprendre les tutos suggérés par brice45 . . . . cela t'aurai fait gagner du temps

[loufab]

Bonjour,

Pour une synthèse du Like c'est là :

http://loufab.developpez.com/tutorie...operateurlike/

Cordialement,