Discussion :

[CHARLI BONGO]

Salut à tous , s'il vous plait comment puis-je créer et exécuter une requête
en VBA .
J'ai écrire un code similaire au code si dessous que j'ai placé sous l'évènement " sur Clic " d'un bouton .
Le code s'exécute correctement car après sur Clic du bouton , lorsque j'ouvre en mode création la requête concernée les modifications sont bien apportés mais dans la table la mise à jour n'est pas effectuée.

Code :

Code :

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

1
2
3
4
5
dim sql as string 
sql = sql & " UPDATE Matable SET Matable.champ1 = '" & valeur & "' "
sql = sql & " WHERE Matable.champ2  < " & critère & " "
DoCmd.DeleteObject acQuery, "Nomrequête"
CurrentDb.CreateQueryDef "Nomrequête", sql

NB : valeur , type string
critère , type double

D'avance merci pour votre aide

[jimbolion]

CHARLI BONGO,

Il t'as en effet bien créer ta requête. Si tu executes celle ci, elle fonctionne sous Access je présume.

Donc si tu regarde bien ta fonction tu crées ta requête mais jamais ne l’exécute. Envoie derrière tout çà un docmd.runsql(ta requête)

D'ailleurs pourquoi ne pas l’exécuter directement plutôt que la créer et l’exécuter ?

A bientôt

JimboLion

[CHARLI BONGO]

ça marche . merci