Export automatique vers excel d'une table access

bjr,
c'est en faite pour consulter en excel des données actualisées

Alors dans l'onglet données > Importer > Access

Ca va créer un lien vers la DB, qui peut etre rafrachi en cliquant sur "mise a jour"

et veux tu le faire avec Excel fermé ??

La solution que je vois, vu qu'access ne gère pas les Jobs, ni Excel d'ailleurs :), c'est de lancer une appli vba (Excel, Access ou Word...) toutes les 30mn via les jobs Windows qui fait ce que tu veux faire (copie).

Mais si ton fichier cible (Excel) est ouvert, je ne garantie rien. Faut tester.

Voici ce que tu peux tester :

On définit au préalable dans un module Access de "x:\base.mdb", la procédure d'exportation.

Exemple :

Tu mets dans ta base un module.

Public Sub Exportation_de_la_base()

DoCmd.TransferSpreadsheet acExport, , "table1", "C:\fichier_excel.xls", False, ""
'table1 et "C:\fichier_excel.xls" à changer bien évidemment, au pire si tu as plusieurs tables, tu mets autant de lignes que nécessaires ou une requête. ET EVITES LES ESPACES DANS LES NOMS DE REPERTOIRES ET FICHIERS

End Sub()


Puis tu appelles la procédure Exportation_de_la_base() depuis Excel :



Sub Btn1_Clic()

'je te mets cela sur un clic d'un bouton (btn1), et après tests, on pourra le mettre sur un timer...


Dim MonAccess As New Access.Application

MonAccess.OpenCurrentDatabase "x:\base.mdb" 'mets ici le chemin complet de ta base
MonAccess.run "Exportation_de_la_base" 'le nom de ta sub
MonAccess.Quit acquitsaveNone 'on quitte sans broncher
Set MonAccess = Nothing 'on libère les ressources

End Sub