Affichage de la fenêtre word - VBA Excel

Affichage de la fenêtre word - VBA Excel - VB/VBA/VBS - Programmation

Marsh Posté le 05-05-2014 à 10:43:52    

Bonjour,
 
J'aimerai savoir comment faire en sorte que la fenêtre word soit visible directement après les instructions VBA Excel suivantes :

Code :
  1. Private Sub CommandButton1_Click()
  2.     Dim Word As Object
  3.     Dim AppWord As Object
  5.     Set Word = CreateObject("Word.Application" )
  6.     Word.WindowState = wdWindowStateMaximize
  7.     Word.Visible = True
  8.     Set AppWord = Word.Documents.Open("K:\Stagiaires\note démarrage.doc", ReadOnly:=True)
  9. End Sub


L'instruction

Citation :

Word.Visible=True

ne permets pas d'afficher directement et "en premier plan" (devant toutes les autres fenêtres actives) le document Word.
 
Merci de votre aide.
 
Cordialement,
 
Jean.


Message édité par jean7580 le 05-05-2014 à 15:17:57
Reply

Marsh Posté le 05-05-2014 à 10:43:52   

Reply

Marsh Posté le 05-05-2014 à 12:07:17    

 
           Bonjour, bonjour,
 
           normal car la propriété  Visible  n'active pas la fenêtre !
 
           Donc juste en consultant l'aide VBA de Word concernant les méthodes de l'objet Application,
           il doit bien y en avoir une pour l'activer …
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed