Ouverture d'un fichier Word depuis Excel
Bonjour,
J'utilise le code suivant que j'ai trouvé sur ce forul pour un fichier Word :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim i As Byte
'Ouvre une session Word
Set WordApp = CreateObject("word.application")
'Ouvre le document Word
Set WordDoc = WordApp.Documents.Open("c:/mesdocuments/monDocument.doc")
'affiche le document Word
WordApp.Visible = True |
Ce qu'il se passe : le fichier word s'ouvre bien, mais il ne s'affiche pas à l'écran (en plein écran) mais reste sous forme d'icône dans la barre des tâches.
Manque t'il une ligne dans le code ?
Merci pour votre aide
