Discussion :

[jonsnow43]

Bonjour à tous,

Je développe actuellement une base de données de pièces et j'aurai grandement besoin de vos conseils pour l'ajout de données.

Je m'excuse par avance si j'ai du mal à expliquer mon problème, je ne suis pas informaticien et les termes de mes tables sont assez barbares donc merci d'avance à ceux prendront la peine de m'aider

Je vais prendre une partie de mes tables: j'ai une table "Parts" liée à une table "LSN" via la table "LSNPartsLink". Voici la représentation schématique des relations :

Chaque numéro de pièce correspond parfois à plusieurs numéro LSN et chaque numéro LSN correspond à plusieurs numéros de pièces c'est pourquoi j'utilise une table intermédiaire. Le numéro LSN est un identifiant interne (par exemple LSN:4523 correspond à la pièce nommée "Vis M5" (champ FRPartName) et dont le numéro pièce (SAPNumber dans l'image) est 182938)

Je souhaiterais que dans le formulaire d'ajout de données, si je saisis le "LSNNumber", il me remplisse automatiquement le reste du formulaire (FRPartName, ENPartName, etc) pour éviter les erreurs de frappe et permettre à l'utilisateur de voir qu'il ne s'est pas trompé de pièce.

Ma question porte donc sur comment récupèrer ces données contenues dans la table LSN à la suite de la saisie du "LSNNumber" dans le formulaire (une simple requête?) sachant que ce sont des champs texte dans le formulaire. Ensuite, comment enregistrer la nouvelle pièce identifiée par son "SAPNumber" dans la table "Parts", là ce qui me coince c'est la table "LSNPartsLink" intermédiaire je ne vois pas comment faire. pour info dans cette table, le champ "LSN_PartID" contient le "SAPNumber" et le champ "LSN_ID" est numérique et égal au champ "LSN_ID" de la table "LSN" qui est un numéro automatique.

Merci à ceux qui sont arrivés à la fin de mon roman, en espèrant que vous pourrez m'aider !

[ClaudeLELOUP]

Bonjour,

Un moyen serait d’utiliser une zone de liste modifiable, tu peux alors récupérer les valeurs des colonnes dans d'autres contrôles.

[jonsnow43]

Merci encore à toi Claude tu me sauves la vie

En plus c'est très simple à utiliser mais il fallait y penser.

Il me reste plus qu'à voir pour l'enregistrement. Pour rajouter un nouveau "LSNNumber" je vois comment faire mais c'est pour faire correspondre la pièce que je j'ajoute("SAPNumber") avec un "LSNNumber" déjà existant.

Enfin je vais me creuser la tête et je reviens appeler au secours si vraiment je sèche

PS: tu m'as donné soif avec le fichier que tu m'as envoyé

[ClaudeLELOUP]

PS: tu m'as donné soif avec le fichier que tu m'as envoyé

C'est hélas un vieux fichier qui me sert pour les exemples. Les stocks actuels sont probablement tous à zéro !

Pour le reste de ce que tu expliques, je n'ai pas tout compris, mais s'il s'agit de lier des éléments de 2 tables pense aux formulaires père/fils.
De la documentation ici : http://claudeleloup.developpez.com/t...us-formulaire/

[jonsnow43]

Bonjour,

La technique marche mais je souhaiterais le faire via VBA car dans un cas mon champ texte affiche les valeurs correspondantes à l'enregistrement (formulaire "mode" consultation des données) et quand je passe en "mode" ajout une liste déroulante apparaît pour que je sélectionne le numéroLSN et ça complète ensuite le champ texte avec le nom de pièce correspondant au numéroLSN.

Je sais que je me complique la vie mais afficher des données dans une liste déroulante je trouve ça pas très esthétique donc c'est pour ça que j'ai un champ texte en consultation et une liste déroulante en ajout de données.

J'ai essayé ce code mais ça m'affiche #Nom*? dans le champ texte :

Code :

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

1
2
3
4
5
Private Sub comboLSNNumber_Change()
 
Me.txtFRPartName.ControlSource = Me.comboLSNNumber.Column(2)
 
End Sub

Au changement de la valeur de ma liste déroulante, je mets le contenu de la 3ème colonne (FRPartname) dans le champ txtFRPartName

Une idée ? Je sens que c'est un truc tout bête en plus.

[jonsnow43]

Rebonjour,

Je sais que je ne devrais par travailler le jour de la fête du travail mais bon ^^

J'ai résolu mon problème comme un grand pour une fois et c'était tout bête. J'ai trouvé la solution grâce à la faq Access

le code qui marche est le suivant:

Code :

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

1
2
3
4
5
6
7
8
Private Sub comboLSNNumber_AfterUpdate()
 
txtFRPartName = comboLSNNumber.Column(2)
txtENPartName = comboLSNNumber.Column(3)
txtSubset = comboLSNNumber.Column(4)
txtCircuit = comboLSNNumber.Column(6)
 
End Sub

Ainsi je complète directement 4 champs texte avec le choix du numéro LSN. Pratique !