Comment ouvrir et fermer un fichier.exe

Question

Bonjour à tous,

Je souhaite ouvrir et fermer la calculatrice (ou un autre éxécutable) depuis une macro Excel.

Pour l'ouvrir j'ai :

Shell("C:\WINDOWS\system32\CALC.exe", 1)

Je n'arrive pas à la fermer.

Merci pour votre aide

cs_CanisLupus · Answer

Salut,

D'abord, tu mets dans le général
public ReturnValue

Puis, à la place de :
Shell("C:\WINDOWS\system32\CALC.exe", 1)
tu mets
ReturnValue = Shell("C:\WINDOWS\system32\CALC.exe", 1)
Ainsi, tu récupère le Handle de l'appli "Calculatrice"

Ensuite, dans un bouton ou dans l'évènement de ton choix, tu colles :

AppActivate ReturnValue 'tu actives l'appli Calculatrice
SendKeys "%{F4}", True ' et tu lui envoies l'ordre de fermeture

Cordialement, CanisLupus

cs_garat · Answer

Merci CanisLupus pour ce coup de pouce.

Cette réponse fonctionne trés bien pour une application qui autorise son focus comme la calculatrice.

Mais dans le cas d'une application qui se lance en tâche de fond dans la barre de tâche et qui demande un clic droit et "Exit" pour se fermer ?

Merci

Garat

Saros · Answer

TerminateProcess

Bouriiiin...

Saros

cs_garat · Answer

Merci Saros pour cette réponse lapidaire.

Mais pourrais-tu développer ?

Merci

Saros · Answer

Si on peut déclarer des APIs en VBA, il est possible de forcer une appilcation à quitter grâce à TerminateProcess :

Public Declare Function TerminateProcess Lib "kernel32" Alias "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long

hProcess c'est le Handle, l'autre je ne sais pas trop à quoi il sert...

Je crois qu'il est également possible d'envoyer un message de sortie genre WM_EXIT à une application pour simuler une fermeture, avec l'API SendMessage.

Saros

cs_garat · Answer

Merci Saros,

Cette fois-ci s'est plus limpide.

Mais j'ai rajouté cette ligne dans mon code VBA et cela ne ferme pas l'application concernée.

A+

Saros · Answer

http://longre.free.fr/pages/api/terminaison.htm

Sous VBA, avec Excel et utilisant l'API TerminateProcess ^^
Qui dit mieux...

Saros

cs_garat · Answer

Une seule chose à dire :

TROP FORT !

 8-)

Comment ouvrir et fermer un fichier.exe

8 réponses

Discussions similaires