Lone-wolf
XLDnaute Barbatruc
Bonjour à tous,
J'ai ce code pour ouvrir un document Word à partir d'un formulaire.
Private Sub Image1_Click()
Dim pWdApp As Word.Application
Dim pWdDoc As Word.Document
Set pWdApp = CreateObject("Word.Application")
Set pWdDoc = pWdApp.Documents.Open("D:\liste.doc")
pWdApp.Visible = True
End Sub
J'aimerais faire de même pour excel et pdf; j'ai déjà essayé quelques codes,
mais je n'obtiens pas le même résultat.
Merci d'avance pour votre aide
J'ai ce code pour ouvrir un document Word à partir d'un formulaire.
Private Sub Image1_Click()
Dim pWdApp As Word.Application
Dim pWdDoc As Word.Document
Set pWdApp = CreateObject("Word.Application")
Set pWdDoc = pWdApp.Documents.Open("D:\liste.doc")
pWdApp.Visible = True
End Sub
J'aimerais faire de même pour excel et pdf; j'ai déjà essayé quelques codes,
mais je n'obtiens pas le même résultat.
Merci d'avance pour votre aide
