Discussion :

[kervin]

Bonjour à tous,

Voici ce qui m'amène ici

Code :

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

1
2
3
4
5
6
Dim CHAMP As String
CHAMP = "T_Base." & Me.nom_Champ
 
DoCmd.RunSQL ("UPDATE T_Base SET'" & CHAMP & "' = [Forms]![F_13_Modif]![New_Val] WHERE (((T_Base.CLE)=[Forms]![F_13_Modif]![Cle]));")
 
DoCmd.Close acForm, "F_13_Modif"

Dans cette requête le champ à mettre à jour n'est pas toujours le même.
Si je lance le code , je reçois un message où il me demande la valeur du paramètre :

'T_Base.LIQU_BU_CTL1'

Je pense que c'est un problème de ' et/ou " dans la requête au niveau de '" & CHAMP & "', mais j'ai beau essayer plusieurs combinaisons, je n'arrive à rien.

Quelqu'un aurai-t-il une idée ?

Merci pour votre aide

[f-leb]

bonjour,

je pense que tu peux enlever les ' :

Code :

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

"UPDATE T_Base SET " & CHAMP & "  = ......"

[kervin]

... En effet, ça marche, je pensais pourtant bien avoir essayé cette possibilité

Merci en tout cas

[Maxence HUBICHE]

Tant qu'on y est...
Si tu veux éviter d'autres erreurs qui proviendraient de l'existence d'un nom de champ réservé ou contenant des caractères spéciaux (espace)... tu peux même faire ça :

Code :

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

1
2
 
"UPDATE T_Base SET [" & CHAMP & "]  = ......"