Lancer word avec vbscript

papillon -  
 malan -
Salut à tous,
J'ai un petit problème.
Voilà, donc je voudrais que le script suivant me lance word:

Sub openWord()
dim objWd
Set objWd=createObject("WScript.shell")
objWd.run "C:\Program Files\Microsoft Office\Office\WINWORD.EXE"

End Sub

MAis j'ai une erreur : Il me dit que le fichier est introuvable.
Au début je pensais que c'était à cause des espaces dans le chemin mais sans espaces ça marche pas non plus..

Est-ce que quelqu'un peut m'aider?

1 réponse

  1. zandphil
     
    il suffit de mettre ça

    Dim word
    Set word = WScript.CreateObject("Word.Application")
    word.Visible=TRUE

    @+
    1
    1. malan
       
      Merci ça marche mais comment y écrire un message ?
      0