[XL-2010] Macro Excel pour import table Access avec sélection

Macro Excel pour import table Access avec sélection

J’aimerais via un code VBA pouvoir créée un macro Excel qui se chargerais d’exécuter une macro qui créer une table ET importer les données en pouvant sélectionner trois critères sur trois champs de la table mais importer tous les autres champs : champs 1 :soc-pro ; champs 2: ANNÉE EXERCICE FISCAL et champs 3: DATE COMPTABLE DU CRÉDIT avec la possibilité de sélectionner du temps au temps a .ensuite après la sélection voulu me coller mes données dans deux onglets excel IFI ET IFU2 sur mon fichier Excel
Résumer sortir d'Excel exécuter une requête ou deux et importer une table avec sélection.
En vous remerciant par avance

bonsoir,

et tu en est ou ?

macro

bonjour,
Je peux dire que tout est fait dans access .Données ok dans une table
Le plus simple serait d’exécuter via une macro excel l'importation de cette table dans deux onglets excel mais avant l'import j'aimerais via une combobox ou userform qu'il me demande trois sélection==> 1 quel societe qui correspond a un champ de la table==>2 quelle année 3==> quel date du au . tous ça correspond a des champs de la table .
ont peux même le faire d’après une requête access si on veut mais je trouvais ça plus simple d’après une table
Il s'agit de ne pas tout importer les données de la table dans excel car trop volumineux seulement ce que j'ai besoins en sachant que mes demandes peuvent changer d'un jour a l'autre je ne veux pas toujours importer les mêmes société.
la seule macro excel que j'ai fait permet d’exécuter une macro access reprenant l’exécution de requête création de table et d'exporter cette table au format excel sur un dossier
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Sub Executer_Macro_Access() Dim oAcApp As Object 'Access.Application Set oAcApp = CreateObject("Access.Application") 'Ouvrir la base de données oAcApp.OpenCurrentDatabase "Q:\support et controle\SERVICES INSTITUTIONNELS\CONTROLES PRODUCTION\SUIVI DES REVENUS\DONNEES POUR TABLE\SAV\DWH - REVENUS.mdb" 'Exécuter la macro oAcApp.DoCmd.RunMacro "EXE REQ TOTAL" 'Fermer la base de données oAcApp.CloseCurrentDatabase 'Libérer les ressources Set oAcApp = Nothing End Sub
merci de votre aides