Lancer une requête SQL Delete à partir de VBA Excel

Bonjour à tous,

Tout est dans le titre ! Je me connecte à une base de donnée à partir d'une macro excel, j'arrive récupérer le résultat d'une requête "Select", à faire des "Insert into", mais impossible de supprimer des lignes d'une table avec une requête "Delete".

J'ai essayé de cette façon :

Code:

---

1 2 3

Dim db As DAO.Database Set db = DBEngine.OpenDatabase(chemin) db.Execute "Delete From Table1 Where Champ1 = '0'"

---

Et j'ai un message d'erreur :

Citation:

---

Run-time error '3464':
Data type mismatch in criteria expression.

---

Quelqu'un a déjà réussi à faire ce genre de requête ?

OUI

Citation:

---

Envoyé par Chrisros

Bonjour à tous,
Quelqu'un a déjà réussi à faire ce genre de requête ?

---

Code:

---

db.Execute "DELETE Table1.* FROM Table1 WHERE Table1.Champ1='0';"

---

Non c'est pareil, même message.
Mais je ne pense pas que mon problème vienne de la requête SQL en elle-même, car si je la lance manuellement ça marche...

Bonjour

Si champ1 est de type numérique pas de cotes autour de 0

qu'est ce que tu entends par ça marche manuellement?

Citation:

---

Envoyé par Chrisros

Non c'est pareil, même message.
Mais je ne pense pas que mon problème vienne de la requête SQL en elle-même, car si je la lance manuellement ça marche...

---

En fait je ne pensais pas que le problème venait de ma requête en elle même, mais finalement c'était bien les cotes autour du zéro !
Trop bête d'être stoppé pour ça.
Merci à vous 2 !