excel / access

[prive38]

Salut à tous

Petite question SVP pour les pro que vous êtes.

Comment peut on ouvrir un fichier excel a partir d'une macro access ?

Merci de votre aide

Prive38

 

[lea]

Bonsoir,

Pour démarrer Excel à partir d'Access

Dim xl As Excel.Application

Set xl = New Excel.Application
xl.Visible = True
.......
ton code
.......

léa

et pour fermer
à la in
xl.Quit

 

[prive38]

salut lea,

Je te remercie pour ta réponse, mais j'ai beau essayé, cela ne fonctionne pas.

Access m'affiche un message " type défini par l'utilisateur non défini" pour l'expression : Dim xl As Excel.Application ?

Je ne connait pas grand chose en VBA.

As tu une idée du pb ?

Merci beaucoup

Prive38

 

[michel_m]

Bonsoir Léa, rive et le forum

Pour compléter ce qu'écrit Léa il faut cocher la référence "Microsoft Excel X.0 Object library" dans la rubrique outils/ référence de l'éditeur VBE d'Access.
X. 0 dépend de la version d'access (9 pour OFFICE 2000)

D'autre part, après Xl.quit, il est préférable de vider la mémoire des objets utilisés par la ligne suivante:
set xl=nothing

Enfin, bien que cela n'empeche pas le fonctionnement, j'aurais écrit:

set xl=Createobject("Excel.application")

With xl

-----
ta macro excel
-----

.quit
end with

A+

Michel

 

[lea]

Bonsoir à tous
Bonsoir Michel,

Cela bien sur va de soi je supposais qu'au préalable la référence adéquat avait été cochée.
Quant à la suite, Michel, je partage entièrement tes suggestions.
C'est le propre même de ce merveilleux forum : complémentariser nos connaissances et idées.
Bonne soirée à tous les deux

Léa