Appel word de Win 7

**iclic** · 05/05/2011, 08h45

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Dim MyWord As Word.Application
dim chemac$
 
chemac$="chemin et nom du fichier.txt à ouvrir avec word "
 
   Set MyWord = New Word.Application
   With MyWord
        .Documents.open (chemac$)
        .Visible = True
        .ActiveDocument.Background.Select (PAGE)
   End With
   MyWord.ShowMe  'n'ouvre plus la fenêtre du word avec le fichier texte

L'appel au word fonctionnait trrès bien avec l'ancien word mais ne fonctionne plus avec le nouveau Word de Win 7
Quelqu'un aurait-il une explication?

Merci.

**SfJ5Rpw8** · 05/05/2011, 09h00

et tout cela sans messages d'erreur ?

**iclic** · 06/05/2011, 09h44

Bonjour,

C-à-d qu'il se met en-dessous en résumé et il ne s'affiche pas directement,il faut cliquer sur l'icone.
Y-aurait-il une instruction qui permet de l'afficher directement à l'écran?

Merci.