Discussion :

[Siocnarfus]

Bonjour à tous,

J'aimerais savoir comment faire une recherchev dans access. J'ai pu voir qu'il y a la macro dlookup (RechDom).
Mon problème :
J'ai 2 tables : BaseProduits et Entrees.
J'ai mis un formulaire pour remplir la table Entrees. J'ai les champs "Code Magh 2 P" et "libelle du produit" dans le formulaire.
J'aimerais que lorsque l'on tape le code magh 2 dans le formulaire, le champ du libellé se remplisse automatiquement.
J'ai les champs "CodeMagh2P", "libelleProduit" etc... dans ma table BasePoduits.
Je veux qu'Access aille rechercher le code magh 2 dans la BaseProduits et mette le libelle correspondant.

J'ai tenté ceci dans la source contrôle mais "erreur!" apparait :

Code :

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

=rechDom("LibelleProduit";"BaseProduits";"CodeMagh2P = " & (txtCodeMagh2P])

Merci d'avance.

[Ric500]

Bonjour!

Essaie avec:

Code :

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

=rechDom("LibelleProduit";"BaseProduits";"CodeMagh2P = '" & [txtCodeMagh2P] & "'")

ou

Code :

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

=rechDom("LibelleProduit";"BaseProduits";"CodeMagh2P = " & chr(34) [txtCodeMagh2P] & chr(34))

si [txtCodeMagh2P] peut contenir une simple cote

Bonne journée

[Siocnarfus]

Bonjour Ric500,
Merci pour ta réponse.

J'ai testé et il me met "la syntaxe de l'expression entrée n'est pas valide. Vous avez peut être entré un opérande sans opérateur."
J'ai bien vérifié la syntaxe et j'ai bien comme toi.

Je commence à me demander si Access est capable de faire des recherchev multi tables ... Je vois que des posts où les personnes donnent une solution monotable ...

Merci

[Ric500]

re-Bonjour Siocnarfus,

Un truc m'échappe, pourquoi parles-tu de "multi-tables"?
"BaseProduits" est bien une table de ta base?

Peux-tu poster l'ensemble de ta procédure ou envoyer une image de ton formulaire ?

[Siocnarfus]

Bonjour,

En faite j'ai plusieurs tables dans mon Access : "BaseProduits", "BaseFournisseurs", "BaseClients", "Entrees" et "Sorties" ...
J'ai créé un formulaire pour chacune de ses tables pour les remplir plus aisément.
Cependant les champs libellé Produit se trouve dans la table "BaseProduits" mais dans le formulaire "Entrées" relié à la table "Entrées", j'aimerais que lorsque l'on saisi le codemagh2 dans le champs textecodemagh2 du formulaire "Entrées", Access fasse tout simplement une recherchev dans la "BaseProduits" pour retrouver le libellé du produit et le mettre automatiquement dans le champ texte libellé du formulaire. Donc c'est bien un partage d'information entre 2 tables...
Je suis d'accord la double information est inutile mais c'est juste pour vérification lorsque l'on saisi les entrées et sorties des produits.

Merci

[Ric500]

Pardon, j'avais mal lu ton premier post.

Dans ton formulaire, sur l'événement "AfterUpdate", crée une procédure événementielle dans laquelle tu insères le code VBA suivant:

Code :

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

libelleProduit=DLookup("LibelleProduit","BaseProduits","CodeMagh2P = " & chr(34) nz([txtCodeMagh2P],"") & chr(34))

ou mieux

Code :

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

libelleProduit=nz(DLookup("LibelleProduit","BaseProduits","CodeMagh2P = " & chr(34) nz([txtCodeMagh2P],"") & chr(34)),"")

Çà devrait marcher

[Ric500]

Si je comprends bien tu as une jointure entre les tables "Entrées" et "BaseProduits" sur le champ "codemagh2 ": dans ce cas pourquoi ne pas faire le choix de l'entrée sur une liste déroulante à 2 colonnes (codemagh2 et LibelleProduit) portant sur une requête avec ces 2 tables liées par une jointure?

[Siocnarfus]

Je ne peux pas faire de liste déroulante car il y a beaucoup trop de produits. Il faudrait que le technicien aie juste besoin de taper le code magh2 et de voir apparaitre le libellé pour vérification.
J'ai tapé ton code dans l'afterupdate mais rien ne se passe ...

[Ric500]

Si si !!!
Nouveau Microsoft Office Access 2007 Base de données.zip

entre les valeurs: xxx111, yyy222 ou zzz333 dans codemagh2.

[Ric500]

Bonjour Siocnarfus,

Je viens de jeter un œil sur ton formulaire "Entrées produits": c'est bien de lui qu'il s'agit?

La procédure sur MAJ de ton contrôle "CodeMagh2P" est vide, par contre tu as saisi le code que je t'ai fourni sur MAJ d'un contrôle "CodeMagh2" inexistant.
Copie colle ce code sur l'événement après mise à jour de CodeMagh2P en corrigeant :

Code :

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

Libelleproduit = Nz(DLookup("LibelleProduit", "BaseProduits", "CodeMagh2P=" & Chr(34) & Nz(CodeMagh2P, "") & Chr(34)), "")

By the way, moi c'est Ric500

[Siocnarfus]

Bonjour Ric500,

Désolé je n'ai pas pu travailler dessus depuis.
J'ai bien mis ce que tu m'as envoyé dans événements Après MAJ mais rien ne se passe...
Il doit y avoir quelque chose qui ne prend pas en compte ce que je fais.
Et ce que je ne comprends pas c'est comment la zone de texte du libellé produits (table entrées) peut aller rechercher le libellé du produits dans la table de produits alors que l'on met aucun événement dans la zone de texte libellé produit (table entrées) ? ( On ne stipule pas cette zone dans la formule )

Encore Merci !

[Ric500]

Bonjour Siocnarfus,

Peux-tu m'envoyer ta base que je jette un œil?