VBS lancer une macro Excel
Bonjou Forum,
Voilà je voudrai lancer une macro (D'excel) à partir d'un fichier VBS. Le probléme est que je ne sais pas comment m'y prendre.
Voici ce que j'ai trouvé sur le web et ne fonctionne pas du tout :( :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| Function main()
appel_macro_NP()
End Function
Function appel_macro_NP()
Dim Xl
Dim Wb
Dim NomMacro
Set Xl = CreateObject("Excel.application")
Xl.Visible = true
Set Wb = Xl.Workbooks.Open("C:\Documents and Settings\blabla\Bureau\classeurtre.xls")
Xl.run WB.Name & "!Module5.essai"
xl.quit
set wb = Nothing
set Xl = Nothing
End Function |
Comme vous avez pu le remarqué ma macro s'appelle : essai
Elle se situe dans le module 5 de PERSO.XLS
Merci des futurs aides
