Discussion :

[flav_cm]

Bonjour à tous,

Depuis Excel, j'édite (des signets d') un document word.

Je souhaiterais faire passer (sur demande à l'utilisateur), le fichier word créé au premier plan.

Pour le moment, je bricole comme ça :

Code :

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

1
2
3
4
5
6
If MsgBox("Voulez-vous ouvrir le document ?", vbQuestion + vbYesNo) = vbYes Then
   wordApp.Visible = True ' Fait apparaitre l'application Word (qui était déjà ouverte avant mais non visible)
   Application.WindowState = xlMinimized ' Minimise la fenêtre Excel
Else
   wordApp.Quit ' Fermeture de Word
End If

Malheuresement ça ne fonctionne pas très bien puisque le document s'affiche derrière les éventuelles fenêtres Windows ou d'autres applications...

Auriez-vous des idées pour faire venir simplement un fichier word déjà ouvert au premier plan ?

Merci d'avance.

[Marc-L]

Bonjour,

voir l'instruction AppActivate …



______________________________________________________________________________________________________
Je suis Paris, Charlie, Bardo, Sousse, Kenya Garissa University, Liban

[kiki29]

Salut, voir par exemple ici

[flav_cm]

Merci à tous les deux pour vos réponses rapides !

ça marche parfaitement avec

Code :

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

AppActivate ("NomDuFichier")

Un grand merci, bonne journée.