Problème avec une requête sql dans VBA

Résolu/Fermé

MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017 - Modifié le 6 mai 2017 à 21:51
MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017 - 7 mai 2017 à 19:31

Bonjour,

J'ai un formulaire avec des zones de texte et un bouton modifier.
Lorsque je clique sur modifier, je souhaite mettre à jour une table avec les données inscrites dans les zones de texte.
Voici mon code simplifié :

Private Sub Cmd_Modifier_Click()

Dim T_Stagiaire As Database
Dim SQL As String

SQL = "UPDATE T_Stagiaire " & _
"SET T_Stagiaire.[Nom_JeuneFille] = Nom_JeuneFille" & _
"WHERE T_Stagiaire.[ID_Stagiaire] = ID_Stagiaire"

DoCmd.RunSQL SQL

End Sub

Le champs de la table reste le même. ça ne modifie rien du tout.
Savez-vous pourquoi, s'il vous plait ?
Merci d'avance.

A voir également:

Problème avec une requête sql dans VBA
Vba écrire dans une cellule ✓ - Forum Excel
Vba range avec variable ✓ - Forum VB / VBA
Find vba - Astuces et Solutions
Blob sql ✓ - Forum Webmastering
Sql lister les tables ✓ - Forum Programmation

1 réponse

Réponse 1 / 1

yg_be Messages postés 23482 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 6 mars 2025 Ambassadeur 1 568
7 mai 2017 à 08:40

bonjour,
n'as-tu aucun message d'erreur?
que sont "Nom_JeuneFille" et "ID_Stagiaire"? peux-tu montrer ton code non simplifié?
ne devrais-tu pas utiliser des zones de ton formulaire?

MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017
Modifié le 7 mai 2017 à 11:36

Bonjour et merci pour la réponse.

T_Stagiaire est ma table
T_Stagiaire.[Nom_JeuneFille] et T_Stagiaire.[ID_Stagiaire] sont des champs de la table
Nom_JeuneFille et ID_Stagiaire sont des zones de texte dans mon formulaire.

Dans la table, ID_Stagiaire est la clé primaire en NuméroAuto et Nom_JeuneFille est juste en texte court.

Le problème de la requête complète est qu'elle est énorme. Du coup, je l'ai mise en commentaire pour l'instant. J'essai déjà de faire marcher cette partie.

yg_be Messages postés 23482 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 6 mars 2025 1 568 > MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017
7 mai 2017 à 11:23

Ta requête n'utilise pas les zones de ton formulaire.
Tu n'as pas de message d'erreur parce que tu utilises les mêmes noms pour tes champs et pour tes zones.
Cependant, ta requête ne fait pas ce que tu crois.
suggestion:

SQL = "UPDATE T_Stagiaire " & _ 
" SET T_Stagiaire.[Nom_JeuneFille] = '" & Me.Nom_JeuneFille & "' " & _ 
" WHERE T_Stagiaire.[ID_Stagiaire] = " & Me.ID_Stagiaire

MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017
Modifié le 7 mai 2017 à 11:47

ça marche !

MHahiko Messages postés 12 Date d'inscription vendredi 19 février 2016 Statut Membre Dernière intervention 7 mai 2017
Modifié le 7 mai 2017 à 11:47

MERCI beaucoup

avec plaisir!

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Certification Pix - Python et SQL

[PL/SQL] le rôle exact du (+) dans une clause

ouverture d'un fichier excel à partir d'un code VBA

Erreur d'exécution 13 Incompatibilité de type