Affichage de la fenêtre word - VBA Excel

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Affichage de la fenêtre word - VBA Excel

jean7580

Bonjour,

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

Code :

Private Sub CommandButton1_Click()
Dim Word As Object
Dim AppWord As Object
Set Word = CreateObject("Word.Application" )
Word.WindowState = wdWindowStateMaximize
Word.Visible = True
Set AppWord = Word.Documents.Open("K:\Stagiaires\note démarrage.doc", ReadOnly:=True)
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

Publicité

Marc L

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 …

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Affichage de la fenêtre word - VBA Excel

Sujets relatifs
Compteur d'heures de travail par projet VBA EXCEL	Ouvrir page dans fenêtre modale
VBA simple : comment faire une série d'identifiant à partir d'un chiff	[RESOLU] [VBA] Remplacement valeur via listbox
Macro VBA utilisant 2 Workbooks	VBA Excel : série de label_x_click()
VBA - Comment cacher le contenu d'une cellule grace au format de cellu	VBA EXCEL Choisir la boite mail d'envoi lors d'un envoi via Outlook
Prévision demande Besoin d'aide VBA EXCEL
Plus de sujets relatifs à : Affichage de la fenêtre word - VBA Excel

Page générée en 0.039 secondes