Enregistrer les données issues d'un formulaire Résolu

Question

Bonjour,

J'ai un formulaire avec 3 menus déroulant (indépendant) + 1 zone de texte.

Je souhaite à l'issu des choix + de la saisie du texte, alimenter une autre table.

1er menu déroulant = choix Demandeur lié à une table externe "TECHS"
 2ème menu déroulant = choix Application lié à une table  "Applications"
3ème menu déroulant = choix Processus lié à une table  "Processus"
+
1 zone texte ( pour saisie)

Avec un bouton je souhaite alimenter une table "Demande de soutien" avec les données des 3 menus déroulant + le texte saisi.

Comment programmer ce bouton pour obtenir ce résultat ?

Merci d'avance,

yg_be · Answer

bonjour, 
je suggère ceci:
Dim tb As DAO.Recordset
Set tb = CurrentDb.OpenRecordset("Demande de soutien")
tb.AddNew
tb!Demandeur = Me.Demandeur
tb!Application = Me.Application
tb!Processus = Me.Processus
tb!texte = Me.texte
tb.Update
les noms après tb! sont les noms des champs dans la table à alimenter 
les noms après Me. sont les noms des zones du formulaire

PYGOS69 · Answer

Merci ! yg_be,

J'ai traduit la macro comme suit :

Private Sub Enr_DDS_Click()
Dim tb As DAO.Recordset
Set tb = CurrentDb.OpenRecordset("Demande de soutien")
tb.AddNew tb!Nom_Agent = Me.Nom
tb!Application = Me.Modifiable37
tb!Processus = Me.Modifiable34
tb!Objet_de_la_demande = Me.Demande
tb.Update
    
End Sub

J'ai un message d'erreur :

Nombre d'arguments incorrect ou affectation de propriété non valide (erreur 450)

Merci d'avance !

Enregistrer les données issues d'un formulaire

2 réponses

Discussions similaires

Newsletters