Ajout de données à une table à partir d'un formulaire

**valou25** · 01/11/2013, 16h19

Bonjour tout le monde!

J'aurais un besoin urgent de votre aide.. je suis chargée de créer un Access pour le travail mais j'ai l'impression que je n'ai pas assez de connaissances en programmation.. je suis complètement bloquée!

J'ai créé un formulaire avec une liste déroulante (voir image jointe). En choissisant le num. de réf du fournisseur dans ma liste déroulante j'obtiens dans des champs "texte"; la réf du fournisseur, le nom du fournisseur et la personnne en interne responsable du fournisseur.. Toutes ces informations se trouvent dans une même table (TBL_Resp).

Je voulais créer un bouton de commande (New vendor) afin de pouvoir entrer un nouveau fournisseur mais je n'y parviens pas..
J'aimerais que les champs (vendor nr., vendor name, responsible) se vident pour que je puisse y entrer les données et ensuite que ces données soient enregistrées dans ma table.

Merci d'avance pour votre aide!

Valérie

**patrice084** · 01/11/2013, 16h33

Envoyé par valou25

Je voulais créer un bouton de commande (New vendor) afin de pouvoir entrer un nouveau fournisseur mais je n'y parviens pas..
J'aimerais que les champs (vendor nr., vendor name, responsible) se vident pour que je puisse y entrer les données et ensuite que ces données soient enregistrées dans ma table.

Bonjour

De mémoire, une fois que le formulaire est affiché en mode création, vous cliquez sur l'outil bouton de commande. En principe un assistant se lance, et vous vous laissez guidé en faisant les bons choix, c'est à dire en sélectionnant opération sur enregistrement puis ajouter enregistrement ensuite, l'assistant vous demandera si vous voulez un bouton avec une image ou avec du texte. Important, pensez à donner un nom bien parlant avec votre bouton du genre BT_Creation_Vendeur.

**valou25** · 02/11/2013, 14h38

Merci Patrice pour votre aide!

J'ai effectué cette opération.. le problème est que j'aimerais entrer les nouvelles données dans les 3 champs (Vendor Nr. / Vendor Name / Responsible).. Mais impossible d'écrire dans les champs.. :-S

Désolée je suis vraiment une novice..

Merci d'avance pour votre aide..

**patrice084** · 02/11/2013, 18h51

Envoyé par valou25

Mais impossible d'écrire dans les champs.. :-S

Désolée je suis vraiment une novice..

Regardez dans la barre d'état (bas d'écran) pour voir le message qui apparait lorsque vous essayez de faire la saisie.

**valou25** · 03/11/2013, 15h19

Voilà le message..

"Control can't be edited; it's bound to the expression '[Vendorlist],[Column](0)',

**patrice084** · 03/11/2013, 17h23

Envoyé par valou25

Voilà le message..

"Control can't be edited; it's bound to the expression '[Vendorlist],[Column](0)',

Là, il faudrait voir comme est constitué votre formulaire d'autant plus que dans votre première copie d'écran, les informations sont tronquées. Visiblement, vous avez des listes déroulantes pour compléter vos zones de texte mais il me parait bizarre de mettre 3 listes déroulantes.

**valou25** · 03/11/2013, 17h45

Oui j'ai simplement créer un combobox et ensuite sur chaque champ dans "Control Source" j'ai écrit "=[Vendorlist].[Column](0)"
Sachant que Vendorlist est le nom de ma Combobox..

Comment dois-je procéder afin de pouvoir visualiser les données mais également entrer de nouvelles données en utilisant les mêmes champs?

**patrice084** · 03/11/2013, 17h54

Envoyé par valou25

Oui j'ai simplement créer un combobox et ensuite sur chaque champ dans "Control Source" j'ai écrit "=[Vendorlist].[Column](0)"
Sachant que Vendorlist est le nom de ma Combobox..

Comment dois-je procéder afin de pouvoir visualiser les données mais également entrer de nouvelles données en utilisant les mêmes champs?

Pour visualiser vos données, il suffit de faire une et une seule liste déroulante (choix : afficher toutes les informations) qui ira interroger votre table et affichera les données du vendeur sélectionné. Ensuite, lorsque vous cliquerez sur le bouton, les zones de texte se videront pour pouvoir faire une nouvelle saisie.

**valou25** · 03/11/2013, 18h25

Envoyé par patrice084

Pour visualiser vos données, il suffit de faire une et une seule liste déroulante (choix : afficher toutes les informations) qui ira interroger votre table et affichera les données du vendeur sélectionné. Ensuite, lorsque vous cliquerez sur le bouton, les zones de texte se videront pour pouvoir faire une nouvelle saisie.

Ok je l'ai fait.. j'ai essayé de créer une "Event Procedure" After Update sur la Combobox.. mais je reçois un message d'erreur "Run-time error '3464' Data type mismatch in criteria expression"

Private Sub Vendorlist_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[Vendor_Nr] = '" & Me![Vendorlist] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

Savez-vous d'où ça peut provenir?

Merci pour votre aide!