ouverture de .doc

J

jacques

Guest
Bonjour le forum,
j'aimerais, dans une feuille de calcul Excel, installer un bouton qui me permette d'ouvrir un document Word. Est ce possible, si oui, quel est le code vba. d'avance merci.
PS: j'avoue ne pas avoir trop cherché!!!
 
M

michel

Guest
Bonjour Jacques

ci joint deux exemples qui j'espere pourront t'aider

pour ouvrir un document existant :

Sub OuvrirDocWordExistant()
Dim Wrd As Object
Dim AppWord As Object
Set Wrd = CreateObject("Word.Application")
Wrd.Visible = True
Set AppWord = Wrd.Documents.Open("c:\mes documents\taches à effectuer.doc", ReadOnly:=True)
End Sub


pour ouvrir un nouveau document :

Sub OuvrirNouveauDocWord()
Dim Wrd As Object
Set Wrd = CreateObject("Word.Application")
Dim AppWrd As Object
On Error Resume Next
Set AppWrd = Wrd.Documents.Add
Wrd.Visible = True
End Sub

bonne soirée
michel
lapin4.gif
 

Discussions similaires

Réponses
1
Affichages
206
Compte Supprimé 979
C
Réponses
4
Affichages
295

Statistiques des forums

Discussions
314 162
Messages
2 106 604
Membres
109 639
dernier inscrit
Phil1860