Dessine un objet OLE (attention il vas prendre un moment
pour trouver tout les objet utilisables) et si tu veux choisir
à durant l'exécution sélectionne [Annuler] sinon tu peux
immédiatement choisir Word.Document.8 ou Excel.Sheet.8
ou peu importe.
Ensuite (si tu choisi d'attendre à l'exécution) je crois qu'il te
suffit de remplir .Classe et .SourceDoc pour arriver à tes fins.
Utilise l'api Sendmessage pour fermer l'objet Word ou autre
ouvert par createobject
Pour cela cherche sur ce site l'exemple qui affiche tous les
applicatifs ouverts, mais éeand le à tous les process ( enleve le
conditionnement sur visible ) et au lieu d'ecrire dans une liste
box le nom de l'applicatif que tu cherche, utilise
sendmessage comme ceci :
SendMessage CurrWnd, WM_CLOSE, 0, 0