Discussion :

[chloe_teb]

Bonjour à tous,

je voudrais faire un formulaire de recherche qui me permet de trouver le nom, prénom et date de naissance d'un personne.

j'ai mes champs dans le formulaire et un bouton, je voudrais qu'en cliquant sur le bouton il fasse une recherche et trouve la personne en question.

Si vous avez des idées, je suis preneuse

Merci pour votre aide

[titi95]

Bonjour

Peux-tu nous préciser
- les champs à renseigner pour lancer la la recherche
- les champs dont tu veux obtenir les valeurs

Titi95

[marot_r]

Bonjour.

Tu as plein d'exemples ici :

Les meilleurs cours et tutoriels pour apprendre Microsoft Access
Interface : les formulaires dans Microsoft Access
Formulaires de recherche
https://access.developpez.com/cours/...#formrecherche

Si tu as des questions à leur propos n'hésite pas.

A+

[chloe_teb]

Alors j'ai trois champs a renseignés: le nom, le prénom et la date de naissance

si je clique sur consulter il devrait m'ouvrir un formulaire avec le résultat de ma recherche (la liste de toutes les personnes ayant le nom et/ou prénom et/ou date de naissance identique)

J'y arrive avec une requête mais ma tutrice veut du VBA et je galère

Voici le formulaire de recherche:

[marot_r]

Bonjour.

Utilises la commande DoCmd.OpenForm et défini son 4ième paramètre (c'est la condition d'un where).

Attention

1. si tu as des données de type texte, il faut mettre des guillemets (") autours de tes critères.
   ex :

   Code :

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

   "[MonChampTexte]=""" & me.MaValeurTexte & """"

2. si tu as des données de type date, il faut mettre des dièses (#) autours de tes critères.
   ex :

   Code :

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

   "[MonChampDate]=#" & format(me.MaValeurDate, "yyyy\mm\dd") & "#"

   Le format n'est pas indispensable mais il évite les ambiguités sur les dates du genre 01/02/2017 qui peuvent parfois être vue comme le 1er février 2017 ou le 2 janvier 2017.
3. si tu as des données d'un autre type date, il ne faut pas mettre de délimiteur autours de tes critères.
   ex :

   Code :

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

   "[MonChampAutre]=" & me.MaValeurAutre

où me. est le formulaire qui exécute le code.

A+

[marot_r]

Et si tu veux utiliser des fonctions ou des conjonctions logiques dans les critères, il faut les écrire en anglais.

ex :

Code :

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

"[MonChampTexte]=""" & me.MaValeurTexte & """ and [MonChamp2]=3"

A+

[chloe_teb]

Salut,

Alors le format date ne marche pas il ne dit "erreur de syntaxe"

Sinon sa marche

[titi95]

Bonjour

Alors le format date ne marche pas il ne dit "erreur de syntaxe"

Et avec ce format ?

Code :

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

"yyyy/mm/dd"

voire celui-ci ?

Code :

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

"dd/mm/yyyy"

Titi95

[chloe_teb]

Salut,

Sa marche pas non plus mais en fait je crois avoir trouvé, je devais mettre trop de guillemets parce que maintenant sa marche

Merci

[titi95]

Quel code en définitive ?

[chloe_teb]

Code :

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

datenaiss=# " & Me![datenaiss] & "#

[titi95]

Ok

N'oublie pas de cliquer sur le bouton Résolu

[chloe_teb]

Finalement mon problème n'est pas totalement résolu

j'affiche bien le nom prénom et date de naissance. Cependant j'affiche toutes les personnes ayant au moins l'un de ces informations. Hors je voudrais affiner mes recherches.

Si le nom : toto le prénom: Paul je voudrais qu'il affiche juste les personnes ayant comme nom toto et prenom paul les deux ensembles

si vous avez des idées...

[marot_r]

Bonjour.

il faut combiner tes critères avec un And.

Code :

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

"Champ1=""" & me.Champ1 & """ and [Champ2]=""" & me.champ2 & """"

A+

[chloe_teb]

C'est se que j'ai fait mais sa n'a pas marché

[chloe_teb]

enfait je voudrais soit l'un soit l'autre soit les deux donc le and ne va pas.

Il va si je met le nom et le prenom mais ne marche pas si l'on ne met que le nom ou le prenom

[marot_r]

Bonjour.

Utilise un or à la place alors.

Code :

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

"Champ1=""" & me.Champ1 & """ or [Champ2]=""" & me.champ2 & """"

et si tu veux tu peux aussi faire quelque chose comme :

Code :

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

1
2
3
4
5
6
7
8
9
dim filtre as string
 
if me.champ1 & "" <> "" and me.champ2 & "" = "" then
   fiiltre="Champ1=""" & me.Champ1 & """  
elseif me.champ1 & "" = "" and me.champ2 & "" <> "" then
   fiiltre="Champ2=""" & me.Champ2 & """  
elseif me.champ1 & "" <> "" and me.champ2 & "" <> "" then
   fiiltre="Champ1=""" & me.Champ1 & """ and [Champ2]=""" & me.champ2 & """"
end if

et utiliser la variable filtre dans les paramètres de docmd.

A+