paramétre de VBS au VBARésolu

Question

Salut,

Voilà, dans le code VBS je lance une macro d'Excel (ici cette macro se nomme "pop")
Dim Xl
 Dim Wb
 Dim NomMacro
 Set Xl = CreateObject("Excel.application")
 Xl.Visible = true
 Set Wb = Xl.Workbooks.Open("C:\eu\machin.xls")
 Xl.run WB.Name & "!Module2.pop"
xl.quit
set wb = Nothing
set Xl = Nothing 

Le truc est que je n'arrive pas à faire passer un paramétre 'string' du VBS au VBA ....
Exemple : 
macro d'Excel (code VBA) :
sub pop(mon_parametre)
msgbox mon_parametre
end sub

code VBS :
Dim Xl
 Dim Wb
 Dim NomMacro
 Set Xl = CreateObject("Excel.application")
 Xl.Visible = true
 Set Wb = Xl.Workbooks.Open("C:\eu\machin.xls")
 Xl.run WB.Name & "!Module2.pop" & "ca_marche"
xl.quit
set wb = Nothing
set Xl = Nothing

J'ai essayé plien de truc pour que la macro d'Excel puisse prendre en compte le paramétre String mais ss résultat convaincant.... Est-ce possible ? quel est la bonne syntaxe ?? 

merci

tpoinsot · Accepted Answer

Salut,

c'est Xl.run WB.Name & "!Module2.pop" , "ca_marche"

ou même x = Xl.run(WB.Name & "!Module2.pop", "ca_marche")

thip

tpoinsot · Answer

euh, trop vite : wb.name ne sert à rien.
Xl.run "Module2.pop" , "ca_marche"

thip

jeanjeandada · Answer

Super merci ca fonctionne nikel

Paramétre de VBS au VBA

3 réponses

Votre réponse

Discussions similaires