Appel de données SQL en VBA

onjour,

J'ai du code SQL dans ma macro Excel. Comment faire pour faire afficher les informations d'une table en SQL. Par exemple, le champs en GRAS. Je ne suis pas capable de l'afficher correctement car j'ai plus d'une table qui se termine avec le nom DESCRIPTION.

ici, la dernière ligne n'est pas bonne...pourquoi?

Code:

---

1 2 3 4 5 6

Set rstDetails = dbs.OpenRecordset("SELECT FT_HORAIRE_DETAIL_TB.DATE_JOUR, FI_UNITE_ADMINIST_TB.SERVICECODE, FI_SERVICE_TB.DESCRIPTION;") Worksheets(ActiveSheet.Name).Range("A" & i + 2).Value = rstDetails!DATE_JOUR Worksheets(ActiveSheet.Name).Range("D" & i + 2).Value = rstDetails!serviceCode Worksheets(ActiveSheet.Name).Range("E" & i + 2).Value = rstDetails!FI_SERVICE_TB.DESCRIPTION

---

Merci de m'aider :D

Bonjour,
regarde la syntaxe de tes précédents champs, tu utilises directement le nom du champs, sans en préciser la table. Essaie avec

Code:

---

Worksheets(ActiveSheet.Name).Range("E" & i + 2).Value = rstDetails!DESCRIPTION

---

Merci beaucoup, mais cela ne fonctionne pas car j'ai d'autre table dans la même requête qui a l'extension .DESCRIPTION ce qui fait en sorte que le code plante. Le problème est que je ne peut pas changer le nom de mes tables car ce sont des tables générique que plusieurs utilisent.

Il faut donc que je puisse spécifier de quel .DESCRIPTION il sagit

Merci de me donner un coup de pouce:ccool:

Bonjour,

Dans la requete il faut utiliser des alias :

Code:

---

SELECT ....,FI_SERVICE_TB.DESCRIPTION AS NomAutiliser

---

et pour utiliser la zone dans le code :

Code:

---

.... =rstDetails!FI_SERVICE_TB.NomAutiliser

---

Il suffit de donner des alias différent pour chaque nom de zone identique.
Cela devrait fonctionner.
Thierry !

Merci Beaucoup. Tout fonctionne comme un charme,

Cet aide est très apprécié:lol::ccool:

Un autre problème de résolu