Discussion :

[PierrotMfff]

Bonjour,

Un petit problème d'écuelle (SQL) en vba:

Code VBA :

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

texte_SQL = "SELECT * FROM [" & NomFeuille & "] WHERE (Statu = 'X') OR (Statu = '3');"

-Cas où je ne possède pas de 3 dans ma "feuille BDD" ça fonctionne
-Cas où je possède un ou plusieurs 3 dans ma "feuille BDD" ça me sors: "erreur d'exécution: type de données incompatible dans l'expression du critère"

des idées?
Bonne journée

[boisgontierjacques]

Si c'est un champ numérique, il ne faut pas d'apostrophe ( '3')

Jacques Boisgontier

[Invité]

Bonjour,
si dans "feuille BDD" tu ne formate pas tes données Texte, Numérique, etc..., pour chaque colonne, tu laisse ado définir pour toi le type de champ!

Excel en fonction des données présente va déterminer sur la la base d’au moins 3 lignes ce qu'il attend de la requête!

Statu

1

2

x

sera vue comme du numérique sauf si tu formate ta colonne en texte!

[PierrotMfff]

Bonjour messieurs,

merci pour votre aide!
Je suis allé dans mes fichiers source qui eux même compilent des données d'un autre fichier... dans leur macros respectives j'ai rajouté:

Code :

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

Sheets("Points").Range(Sheets("Points").Cells(3, 10), Sheets("Points").Cells(2 + UBound(Transposée_Import, 2), 10)).NumberFormat = "@"

à la fin, qui permet de formater les données de ma colone (celle qui sera a posteriori testée en SQL) en format texte... En revenant sur le fichier, je lance la macro... et ça marche!

Encore une fois merci pour votre aiguillage!
Bonne journée