Discussion :

[nicodgb]

Bonjour à tous,

Je suis débutant et j'ai un petit problème sur Access.
J'ai un formulaire avec une liste déroulante et je voudrais faire référence à l'objet choisi dans la liste (qui est un champ de type texte) dans une requête Mise à jour que j'ai directement tapée en VBA.

Code :

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

1
2
3
4
5
6
7
   Dim mySQL As String
    'Jai essayé ici de déclarer la variable de la liste déroulante
    Dim ObjetListe As Variant
   ObjetListe = Forms![MyForm]![MyControl].Value
 
    mySQL = "UPDATE MyTable"
    mySQL = mySQL + " SET MyTable.[MonChamp] = ObjetListe,"

Seulement là une msgBox s'affiche et me demande la valeur du paramètre ObjetListe
si je tape manuellement la valeur que j'avais sélectionnée dans ma liste déroulante la mise à jour se fait correctement.
Donc voilà je ne sais pas comment faire référence à cette variable dans mon instruction SQL.

Sinon j'ai trouvé sur le site de microsoft cette réponse qui est du chinois pour moi:
Q. comment utiliser une variable Visual Basic dans une requête SQL ?

Variables a Visual Basic et les propriétés doivent être concaténées dans la chaîne SQL. Si vous
incorporez le nom de la variable, votre code recherche avec le nom de la variable au lieu de la valeur de la
variable.

[Invité]

Bonjour et bienvenue sur le forum Office de DVP.

Il faut sortir ta variable de la chaine.

Si ta valeur est de type numérique

Code :

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

mySQL = mySQL + " SET MyTable.[MonChamp] =" & ObjetListe

Si ta valeur est de type texte

Code :

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

mySQL = mySQL + " SET MyTable.[MonChamp] ='" &  ObjetListe &"'"

Je te conseille d'utiliser plutôt le & que le + pour les concaténations

Philippe

[nicodgb]

Merci beaucoup pour cette réponse d'une rapidité incroyable et qui marche en plus et désolé pour le bout de code sans balises.

Merci encore et à bientôt

[Invité]

De rien, penses à cliquer sur le bouton en bas

Philippe