Discussion :

[MICLANG]

Bonjour.

Le contexte :
- Windows serveur 2008, en TSE
- Word Excel 2007 ou 2010
- Un fichier Excel ouvre un fichier Word.

Dans le fichier Excel, j'ai le code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
    Dim WordApp As Object
 
    Set WordApp = CreateObject("word.application") 'ouvre session word
 
    WordApp.Visible = True
    WordApp.Activate
    WordApp.WindowState = xlMaximized
 
    Set WordDoc = WordApp.Documents.Open(Sour) 'ouvre document Word

Mon soucis est que le document Word ne se maximise pas à l'écran, il reste clignotant dans la barre des taches.

J'ai vérifié en déplaçant les commandes d'activation et de maximisation après l'ouverture du documents : pas de changements.
Ce même classeur Excel ouvre également d'autres classeurs Excel qui se maximisent sans problème.


Ce même code ne pose par ailleurs pas de problème sur d'autres postes avec Windows XP ou 7 (hors TSE, donc).

Pensez-vous :
- qu'il y a un lien avec le TSE ou WS2008,
- que mon code est incomplet et erronné,
- ...
et donc avez vous une solution ?

Merci.

[electrons]

Bonjour MICLANG,

J'ai essayé ton code mais je l'ai modifié en mettant entre guillemets le chemin complet avec le nom du fichier et je n'ai pas de problème.

Code :

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

Set WordDoc = WordApp.Documents.Open("C:\Sour")

J'espère que cela fonctionnera pour toi aussi.

A plus