Enregistrer les données issues d'un formulaire
Résolu/Fermé
PYGOS69
Messages postés
452
Date d'inscription
jeudi 23 août 2012
Statut
Membre
Dernière intervention
10 octobre 2023
-
11 sept. 2019 à 11:48
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 - 11 sept. 2019 à 15:07
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 - 11 sept. 2019 à 15:07
A voir également:
- Enregistrer les données issues d'un formulaire
- Audacity enregistrer son pc - Guide
- Enregistrer son ecran - Guide
- Enregistrer video youtube - Guide
- Enregistrer en pdf - Guide
- Effacer les données de navigation - Guide
2 réponses
yg_be
Messages postés
22724
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
25 avril 2024
1 476
11 sept. 2019 à 12:31
11 sept. 2019 à 12:31
bonjour,
je suggère ceci:
les noms après
les noms après
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
Messages postés
452
Date d'inscription
jeudi 23 août 2012
Statut
Membre
Dernière intervention
10 octobre 2023
21
Modifié le 11 sept. 2019 à 13:58
Modifié le 11 sept. 2019 à 13:58
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 !
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 !
yg_be
Messages postés
22724
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
25 avril 2024
1 476
Modifié le 11 sept. 2019 à 14:54
Modifié le 11 sept. 2019 à 14:54
merci d'utiliser les balises de code quand tu partages du code.
à quelle ligne as-tu l'erreur?
compare ton code au mien, regarde bien mes lignes 3 et 4.
à quelle ligne as-tu l'erreur?
compare ton code au mien, regarde bien mes lignes 3 et 4.
PYGOS69
Messages postés
452
Date d'inscription
jeudi 23 août 2012
Statut
Membre
Dernière intervention
10 octobre 2023
21
11 sept. 2019 à 15:07
11 sept. 2019 à 15:07
Oui, en effet je n'ai pas séparer ,
tb.AddNew tb!Nom_Agent = Me.Nom
en
tb.AddNew
tb!Nom_Agent = Me.Nom
Merci beaucoup pour ton aide !
Bien cordialement,
tb.AddNew tb!Nom_Agent = Me.Nom
en
tb.AddNew
tb!Nom_Agent = Me.Nom
Merci beaucoup pour ton aide !
Bien cordialement,