Bouton qui ouvre un fichier Word sur Excel

Guendusse Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
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.



A voir également:

2 réponses

Réponse 1 / 2
Raymond PENTIER Messages postés 58990 Date d'inscription   Statut Contributeur Dernière intervention   17 354
 
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   Statut Membre Dernière intervention  
 
Oui, ca je connais et je sais faire moi ce que je veux c'est qu'il soit intégré à mon fichier Excel.
0
Réponse 2 / 2
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
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