Code VBA pour exécuter une requête Access (avec image)
Qu'est-ce que c'est ?
Ce code VBA vous permet d'exécuter le Accès à partir de n'importe quel outil compatible avec VBA, tel que MS Excel, Word, etc.
Pourquoi ?
You can avoid the process of opening the DB and executing the query manually; this code will execute even from an Excel sheet without opening the Access DB manually.
Si vous utilisez la fonction Importer Accéder aux résultats des requêtes comme indiqué dans l'article précédent, vous obtenez même les résultats de la requête vers Excel, le tout en un seul clic.
Code VBA pour importer les données d'une table ou d'une requête Access vers Excel
Comment utiliser le code VBA pour exécuter une requête Access ?
(adsbygoogle = window.adsbygoogle || []).push({});
Étape 1: Copiez-collez le code ci-dessous dans votre module.
Dim myDB As Database
Set myDB = OpenDatabase("C:\MYDATABASE.mdb") Mentionnez le chemin d'accès à la base de données et remplacez "MYDATABASE" par le nom de votre base de données Access.
myDB.Execute "myQuery" (ma requête) Remplacez 'myQuery' par le nom de votre requête Access
myDB.close N'utilisez cette option que si vous souhaitez fermer la DB.
Set myDB = OpenDatabase("C:\MYDATABASE.mdb") Mentionnez le chemin d'accès à la base de données et remplacez "MYDATABASE" par le nom de votre base de données Access.
myDB.Execute "myQuery" (ma requête) Remplacez 'myQuery' par le nom de votre requête Access
myDB.close N'utilisez cette option que si vous souhaitez fermer la DB.
Étape 2: Cliquez sur le bouton Exécuter ou sur F5 pour exécuter la requête Access.