OVH Cloud OVH Cloud

Lancer Word depuis excel

1 réponse
Avatar
Daniel
Je cherche =E0 ouvrir un fichier word en lecture seule=20
depuis XL.

Merci pour votre aide

1 réponse

Avatar
gueridon
bonjour,
tout d'abord, il faut Outils/Références et sélectionner
Microsoft Word Object Library(8.0 pour word 97, 9.0 pour
2000 et 10.0 pour word 2002).
Puis dans le code, par exemple, pour copier coller un
tableau excel

Range("a1").CurrentRegion.copy ' copie du tableau excel

'on crée un objet Word
Set appWD = CreateObject("Word.Application")

'toute ligne commençant par appwd concerne Word
appWD.Visible = True
appWD.Documents.Add
appWD.Selection.Paste
appWD.Documents.Save
appWD.Documents.Close
appWD.Visible = False

:-)
-----Message d'origine-----
Je cherche à ouvrir un fichier word en lecture seule
depuis XL.

Merci pour votre aide

.