Discussion :

[Chrysostome]

Bonjour, comment lancer vbs avec arguments depuis vba?
J'ai essayé plusieurs méthode:

Code :

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

1
2
3
4
Dim oWsh As Variant
Set oWsh = CreateObject("Shell.Application")
oWsh.ShellExecute "C:\Program Files\Assur\CombineAndAddBookmarks.vbs" & " /explogo1.bmp"
Set oWsh = Nothing

ou

Code :

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

1
2
3
4
Dim oWsh As Variant
Set oWsh = CreateObject("Shell.Application")
oWsh.ShellExecute "C:\Program Files\Assur\CombineAndAddBookmarks.vbs" & " explogo1.bmp"
Set oWsh = Nothing

etc ...

Merci de vos réponses éclairées et éclairantes.

[tee_grandbois]

Bonsoir,
essaie comme çà :

Code :

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

1
2
3
4
Dim oWsh As Variant
Set oWsh = CreateObject("Shell.Application")
oWsh.ShellExecute "C:\Program Files\Assur\CombineAndAddBookmarks.vbs" , "explogo1.bmp"
Set oWsh = Nothing

mais si tu avais fait une recherche sur le net avec ShellExecute, je pense que tu aurais pu trouver tout seul.

[vodiem]

Salut Chrysostome et tee_grandbois,

Code :

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

shell "cscript " & "C:\Program Files\Assur\CombineAndAddBookmarks.vbs" & " explogo1.bmp"

[Chrysostome]

Merci de vos réponses.