Bouton qui ouvre un fichier Word sur Excel [Fermé]

Signaler
Messages postés
2
Date d'inscription
mardi 10 octobre 2017
Statut
Membre
Dernière intervention
11 octobre 2017
-
Messages postés
7268
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
22 février 2021
-
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

Messages postés
53307
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
22 février 2021
15 327
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)
Messages postés
2
Date d'inscription
mardi 10 octobre 2017
Statut
Membre
Dernière intervention
11 octobre 2017

Oui, ca je connais et je sais faire moi ce que je veux c'est qu'il soit intégré à mon fichier Excel.
Messages postés
7268
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
22 février 2021
616
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