OVH Cloud OVH Cloud

Access et Excel

2 réponses
Avatar
Dan
Salut

J'aimerais à partir de access, ouvrir un document excel et ensuite exécuter
une fonction dans le module1.

Je suis pas capable d'ouvrir le document sans probleme mais j'arrive pas à
trouver comment éxécuter une fonction qui est dans le module1
J'ai essayé sans succes ces 2 commandes
xl_classeur.module1.mafonction
et
xl_classeur.mafonction

Dim XL_App As Object
Set XL_App = CreateObject("Excel.Application")
Dim XL_Classeur As Object
Dim XL_Feuille As Object
Set XL_Classeur =xl_app .Workbooks.Open(Document)

Merci

2 réponses

Avatar
Raymond [mvp]
Bonsoir.

au lieu de xl_classeur.module1.mafonction, ce serait plutôt
XL_App.Run "Classeur1.xls!MaFonction"
ou
XL_App.Run "MaFonction"
par exemple

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Dan" a écrit dans le message de news:

Salut

J'aimerais à partir de access, ouvrir un document excel et ensuite
exécuter
une fonction dans le module1.

Je suis pas capable d'ouvrir le document sans probleme mais j'arrive pas à
trouver comment éxécuter une fonction qui est dans le module1
J'ai essayé sans succes ces 2 commandes
xl_classeur.module1.mafonction
et
xl_classeur.mafonction

Dim XL_App As Object
Set XL_App = CreateObject("Excel.Application")
Dim XL_Classeur As Object
Dim XL_Feuille As Object
Set XL_Classeur =xl_app .Workbooks.Open(Document)

Merci




Avatar
Dan
merci !

"Raymond [mvp]" a écrit dans le message de
news: uG$
Bonsoir.

au lieu de xl_classeur.module1.mafonction, ce serait plutôt
XL_App.Run "Classeur1.xls!MaFonction"
ou
XL_App.Run "MaFonction"
par exemple

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Dan" a écrit dans le message de news:

Salut

J'aimerais à partir de access, ouvrir un document excel et ensuite
exécuter
une fonction dans le module1.

Je suis pas capable d'ouvrir le document sans probleme mais j'arrive pas
à


trouver comment éxécuter une fonction qui est dans le module1
J'ai essayé sans succes ces 2 commandes
xl_classeur.module1.mafonction
et
xl_classeur.mafonction

Dim XL_App As Object
Set XL_App = CreateObject("Excel.Application")
Dim XL_Classeur As Object
Dim XL_Feuille As Object
Set XL_Classeur =xl_app .Workbooks.Open(Document)

Merci