Bouton qui ouvre un fichier Word sur Excel

Fermé
Guendusse
Messages postés
2
Date d'inscription
mardi 10 octobre 2017
Statut
Membre
Dernière intervention
11 octobre 2017
- 10 oct. 2017 à 22:48
cs_Le Pivert
Messages postés
7751
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
24 mai 2022
- 11 oct. 2017 à 13:48
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

Raymond PENTIER
Messages postés
56107
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
24 mai 2022
17 210
Modifié le 11 oct. 2017 à 03:52
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
Guendusse
Messages postés
2
Date d'inscription
mardi 10 octobre 2017
Statut
Membre
Dernière intervention
11 octobre 2017

11 oct. 2017 à 07:34
Oui, ca je connais et je sais faire moi ce que je veux c'est qu'il soit intégré à mon fichier Excel.
0
cs_Le Pivert
Messages postés
7751
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
24 mai 2022
710
11 oct. 2017 à 13:48
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