Ouvrir un Fichier .Doc

Nevil

XLDnaute Occasionnel
Salut à toutes et a tous,

J'ai une question peut etre un peu bete:

Dans mon classeur XL, j'ai des boutons de commande (tout ce qui a de plkus banal), et je voudrais qu'en cliquant dessus ces boutons, le fichier .doc associé a chaque bouton s'ouvre.
En gros, je souhaiterais le meme fonctionnement qu'un lien hypertext mais sous forme de bouton de commande.
Et la, j'ai po trop d'idée ...

Je vous remercie

Nevil
 

Staple1600

XLDnaute Barbatruc
Re : Ouvrir un Fichier .Doc

C'est bien ce qui me semblait


Mais j'ai pu faire ca

Sub Macro1()
Range("B5").Select
ActiveSheet.OLEObjects.Add(ClassType:="Wordpad.Document.1", Link:=False, _
DisplayAsIcon:=False).Activate
Range("F14").Select
End Sub
 

Staple1600

XLDnaute Barbatruc
Re : Ouvrir un Fichier .Doc

Re

Il y a aussi un exemple la, sur le WIKI du forum

Ouvrir un document Word existant à partir d'Excel


Sub ouvrirDocWordExistant()
'necesite d'activer la reference Microsoft Word xx.x Object Library
Dim appWrd As Word.Application
Dim docWord As Word.Document
Set appWrd = createObject("Word.Application")
appWrd.Visible = True
Set docWord = appWrd.Documents. _
Open("C:\mes documents\XLD.doc", readOnly:=True)
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
314 450
Messages
2 109 724
Membres
110 552
dernier inscrit
jasson