Relation entre deux champs sous access.
Fermé
sebastienrol
-
22 janv. 2003 à 21:47
pberten116 Messages postés 4 Date d'inscription jeudi 5 septembre 2002 Statut Membre Dernière intervention 28 janvier 2003 - 23 janv. 2003 à 13:05
pberten116 Messages postés 4 Date d'inscription jeudi 5 septembre 2002 Statut Membre Dernière intervention 28 janvier 2003 - 23 janv. 2003 à 13:05
A voir également:
- Relation entre deux champs sous access.
- Deux comptes whatsapp - Guide
- Deux caractères manquent dans cette url ✓ - Forum Programmation
- Access denied - Forum Bbox Bouygues
- Deux ecran pc - Guide
- Tableau croisé dynamique différence entre deux colonnes ✓ - Forum Excel
3 réponses
choubaka
Messages postés
39153
Date d'inscription
jeudi 4 avril 2002
Statut
Modérateur
Dernière intervention
24 mars 2023
2 099
22 janv. 2003 à 21:54
22 janv. 2003 à 21:54
salut
une solution serait de créer une table ayant comme clé unique le n° et comme entrée le nom du département associé.
Créer ensuite une liste de choix dans la table principale avec tes numéro de département.
Ensuite créer une requête te permettant de retirer les info nécessaires pour l'affichage par exemple dans un état.
Choubanimal :
Recherche producteur pour superproduction ou + si affinités
une solution serait de créer une table ayant comme clé unique le n° et comme entrée le nom du département associé.
Créer ensuite une liste de choix dans la table principale avec tes numéro de département.
Ensuite créer une requête te permettant de retirer les info nécessaires pour l'affichage par exemple dans un état.
Choubanimal :
Recherche producteur pour superproduction ou + si affinités
pberten116
Messages postés
4
Date d'inscription
jeudi 5 septembre 2002
Statut
Membre
Dernière intervention
28 janvier 2003
23 janv. 2003 à 13:02
23 janv. 2003 à 13:02
Salutations,
Voici une possibilité:
1. Tu crées une table (Departements) avec le N° de dép (NrDep). et le nom (NomDep).
2. Dans ton Form, tu crées un combo (NrDep) que tu lies au N° et un champ texte (que tu appelles "NomDep", pex)
3. Comme Event "On Clic" pour le combo tu écris le code suivant:
Private Sub NrDep_Click()
Set mDB = CurrentDb
Set mRS = mDB.OpenRecordset("Departements", dbOpenDynaset, dbSeeChanges, dbPessimistic)
mRS.FindFirst "[NrDep]='" & Me!NrDep.Value & "'"
NomDep.Value = mRS("NomDep").Value
mRS.Close
mDB.Close
End Sub
Comme il n'y a pas de confusion possible, tu peux (comme je le fais, donner le même nom aux champs de la table qu'aux nom des champs dans le form.
Pb
Voici une possibilité:
1. Tu crées une table (Departements) avec le N° de dép (NrDep). et le nom (NomDep).
2. Dans ton Form, tu crées un combo (NrDep) que tu lies au N° et un champ texte (que tu appelles "NomDep", pex)
3. Comme Event "On Clic" pour le combo tu écris le code suivant:
Private Sub NrDep_Click()
Set mDB = CurrentDb
Set mRS = mDB.OpenRecordset("Departements", dbOpenDynaset, dbSeeChanges, dbPessimistic)
mRS.FindFirst "[NrDep]='" & Me!NrDep.Value & "'"
NomDep.Value = mRS("NomDep").Value
mRS.Close
mDB.Close
End Sub
Comme il n'y a pas de confusion possible, tu peux (comme je le fais, donner le même nom aux champs de la table qu'aux nom des champs dans le form.
Pb
pberten116
Messages postés
4
Date d'inscription
jeudi 5 septembre 2002
Statut
Membre
Dernière intervention
28 janvier 2003
23 janv. 2003 à 13:05
23 janv. 2003 à 13:05
J'ai oublié les déclarations.
Juste avant "Set mDB = CurrentDb " il faut ajouter:
Dim mDB as Database
Dim mRs as Recordset
Bye Bye
Pb
Juste avant "Set mDB = CurrentDb " il faut ajouter:
Dim mDB as Database
Dim mRs as Recordset
Bye Bye
Pb