le plus simple est l'emploi de la fonction shell , à condition de connaitre l'emplacement de winword sur ton disque:
Private Sub ouvrirword_Click()
Dim sprogexe As String
Dim sfichierdoc As String
sprogexe = "C:\Program Files\Microsoft Office\Office\WINWORD.EXE"
sfichierdoc = "c:\logo.doc"
Shell sprogexe + " " + sfichierdoc, vbNormalFocus
End Sub
à bientôt 