Liee une liste deroulante avec zone de texte

Fermé
doti - 14 janv. 2011 à 15:58
 doti - 18 janv. 2011 à 12:45
Bonjour,

j ai une base de donnee ' Table_Fournisseur ' avec les champs suivantes :

1-NOM_FOURNISSEUR. (texte)
2-NUMERO_COMPTE . (numero)
3-BANQUE. (texte)
4-ADRESSE_BANQUE. (texte)

j ai creer un formulaire ' Formul_VRT_Fournisseur ' sur access :

* NOM_FOURNISSEUR comme Liste deroulante ' Liste_Nom_Fournisseur'
* et les autres champs comme zone de texte nomé comme suit :
- ZT_NUMERO_COMPTE
- ZT_BANQUE
- ZT_ADRESSE_BANQUE
Ce que je veux c'est de relier la liste deroulante au autres champs, dés que je choiser sur clik le nom fournisseur , les autres champs s'affiche automatiquement.

Ca fait un bon temps que je cherche sur inetrnet et je trouve pas la solution

Merci.

1 réponse

Jean_Jacques Messages postés 1040 Date d'inscription mercredi 30 avril 2008 Statut Membre Dernière intervention 1 août 2014 112
14 janv. 2011 à 20:08
Bonsoir doti,
Voici le code de l'évènement [Après mis à jour] à créer derrière le champ qui accueille la liste ...

Bien entendu il convient d'adapter ceci à votre contexte.
NB: Les valeurs notées <XYZ> sont à remplacer par les noms que vous utilisez dans votre base.


Private Sub <liste>_AfterUpdate()
With CodeContextObject
DoCmd.GoToControl "[<Champ>]"
DoCmd.FindRecord <Liste>, , True, , True

If <champ> <> <Liste> Then
MsgBox "Cet enregistrement est inconnu : " & Me!Liste
Me!<Liste> = ""
End If

End With

End Sub


Cordialement
0
Salut,

Sans passer par VBA, on peut également placer dans la requête de sélection de la liste déroulante (Données => contenu) toutes les colonnes qui nous intéressent, les masquer (Format => Nb de colonnes = Nb total de tes colonnes puis largeur des colonnes 2;0;0;0;0;0...) seule la première colonne sera visible.

Ensuite dans la zone de texte on inscrit "=[FORMS]![NomFormulaire]![NomListe].Column(1)" pour afficher la valeur de la colonne 2 (masquée dans la zone de liste déroulante) "=[FORMS]![NomFormulaire]![NomListe].Column(2)" pour afficher la valeur de la colonne 3 dans une seconde zone de texte par exemple.

Cordialement
Ship
0
j ai deja met un commentaire deux fois et ca s affiche pas ?
0