Discussion :

[JeanDan]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[ced600]

ne fonctionne pas du tout

C'est à dire ?

[JeanDan]

Slt,
bin ma macro (d'excel) comporte un simple :
msgbox("ca marche")
Et je nele vois pas apparaitre
Et puis je ne vois pas Excel s'ouvrir

Merci des aides

[ced600]

Un script ne possède pas de fonction main.
SI tu mets tout dans des fonctions il faut les appeller.
donc appelle ton main au debut du script.

[JeanDan]

ced600,


Je te remercie de m'avoir dirigé sur la solution. En effet rien ne fonctionné car aucune fonction n'était appelé

Merci ++