Home

Piloter Excel a partir d'access

Submitted by PiTiLeZarD on Tue, 03/08/2005 - 22:02
Tagged:

J'ai du développer des outils statistiques basés sur une base de données access et nécéssitant la génération de graphiques multiples et variés au format Excel ... Cette phrase me fait peur ...

J'ai donc du faire un fichier Excel a partir de Access (en résumé ... mais ça me fait pas moins peur ...)

Voici comment je m'y suis pris :

 'Déclaration de base
 Dim xlApp as Object
 Dim xlSheet as Object
   
 'Lancement de Excel et selection du classeur
 Set xlApp = New Excel.Application
 Set xlSheet = xlApp.Workbooks.Open("C:/fichier.xls")
 
 'Ici pilotage de l'application
 
 'Fermeture et sauvegarde
 xlSheet.Save
 xlSheet.Close xlApp.Quit
 Set xlApp = Nothing
 Set xlSheet = Nothing

Bon naturellement au niveau du pilotage il faut maitriser la prog VBA Excel mais je vous fais confiance :)