Bonjour,

J'utilise le code suivant que j'ai trouvé sur ce forul pour un fichier Word :


Code : Sélectionner tout - Visualiser dans une fenêtre à part
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