Bouton qui ouvre un fichier Word sur Excel

Guendusse Messages postés 2 Statut Membre -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,

Je voudrais savoir comment je peux faire un bouton ou quand on clique dessus mon fichier Word s'ouvre.

Sachant que j'aimerai que quand je déplace mon fichier Excel sur un autre poste se ficher Word puisse quand même s'ouvrir.

Merci d'avance pour vos réponses.

2 réponses

  1.
    Raymond PENTIER Messages postés 58222 Date d'inscription   Statut Contributeur Dernière intervention   17 486
     
    Bonjour, et bienvenue.

    ... ça s'appelle un lien hypertexte ; et le fichier Word ne pourra s'ouvrir que si lui aussi est installé sur l'autre poste, et dans le même répertoire.
    Ou alors il faudrait l'héberger sur le Cloud, et l'appeler par son URL ...

    C'est bien, la retraite ! Surtout aux Antilles ... :-) 
    Raymond (INSA, AFPA, CF/R)
    0
    1. Guendusse Messages postés 2 Statut Membre
       
      Oui, ca je connais et je sais faire moi ce que je veux c'est qu'il soit intégré à mon fichier Excel.
      0
  2. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    Une solution en vba.
    Il faut que le document Word soit dans le même dossier que le classeur Excel: 

    Option Explicit
'aller dans Outils, Reference et cocher  Microsoft Word 12.0 Object Library
Private Sub CommandButton1_Click()
Dim wrdApp As Word.Application
  Dim wrdDoc As Word.Document
  Set wrdApp = CreateObject("Word.Application")
  wrdApp.Visible = True
  Set wrdDoc = wrdApp.Documents.Open(ThisWorkbook.Path & "\mondocument.docx") 'adapter le nom du document Word
End Sub

    0