Comment lancer une requete sélection(SQL) par du code ?

Bonjour à tous,
Est-il possible de lancer par une procedure, une requête SÉLECTION elle même ecrite dans la procedure sous forme de 'Texte SQL' (comme on le fait avec une requete action), sans qu'elle n'est été au préalable enregistrée et nommée.

Elle n'est donc pas dans le volet de recherche Access.

En fait, peut-on obtenir le même résultat par du code que celui obtenu par un db-Clic sur le nom d'une requete figurant dans le volet de recherche et qui affiche le résultat du 'Select' sous forme de 'Feuille de données ?
L.P

Bonjour,

Voici un exemple de code pour créer la requête et l'exécuter :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Public Sub Exemple() Dim sSql As String Dim qy As QueryDef   sSql = "SELECT VINS.DENOMINATION, VINS.APPELLATION, VINS.CATEGORIE " _ & "FROM VINS " _ & "WHERE (((VINS.APPELLATION) = ""BORDEAUX"") And ((VINS.CATEGORIE) Is Not Null)) " _ & "ORDER BY VINS.DENOMINATION;"   Set qy = CurrentDb.CreateQueryDef("temp", sSql)   DoCmd.OpenQuery "temp"   'Libérer la mémoire Set qy = Nothing   End Sub

---

Extra. .
Salut et encore Merci.