Discussion :

[milielf]

bonjour,

j'essaye d'ouvrir une requete sélection à partir du VBA. je me suis donc aidée de la FAQ, et j'ai concocté ceci:

Code :

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

1
2
3
4
5
6
7
8
9
 
 
Dim verifGC As ADODB.Connection
Dim SQLverifGC As New ADODB.Recordset
 
Set verifGC = CurrentProject.Connection
SQLverifGC.ActiveConnection = verifGC
 
SQLverifGC.Open "SELECT PARCELLE.ID_PARCELLE, PARCELLE.GC FROM PARCELLE WHERE (((PARCELLE.GC)<>''))"

mon probleme : ça ne marche pas...aucun message d'erreur, mais rien ne s'ouvre. je n'arrive pas à voir mon erreur

[Tofalu]

Il s'agit de ADO là. Tes données sont en mémoire, elle ne seront pas affichées.
Pour ouvrir une requête Select à l'écran quand son code SQL est dans VBA, il faut utiliser les objets QueryDef pour enregistrer la requête et utiliser docmd.OpenQuery pour l'ouvrir.

CurrentDb.CreateQueryDef "LaRequete", "SELECT PARCELLE.ID_PARCELLE, PARCELLE.GC FROM PARCELLE WHERE PARCELLE.GC)<>''"
DoCmd.OpenQuery "LaRequete"

Plus de précision sur les objets QueryDef : http://warin.developpez.com/access/dao

[milielf]

merci, j'avais essayé cette solution avant, mais ça ne marchait pas non plus (mais il me semble que je n'avait pas exactement cette syntaxe, ceci expliquant cela ), c'est pourquoi je m'était rabattu sur ce que j'avais pu trouver dans la FAQ.