comment tuer un processus en vba Fermé

Question

Bonjour,
j'aimerais bien savoir comment tuer un processus EXCEL.EXE en vba
je suis en vba sous access

merci

audalice · Accepted Answer

Pour l'utilisation de Taskkill, il semble que l'écriture du code VBA soit plutôt :

vba.Interaction.Shell("TASKKILL /F /IM excel.exe")

ShaBoo · Answer

Bonjour,

regarde ici, si cela peut aider :

https://www.developpez.net/forums/d275853/logiciels/microsoft-office/access/vba-access/api-supprimer-tache-vba-access/

lord_in · Answer

est ce que la fonction kill peut marcher dans un programmer vba??

Raph04 · Answer

J'ai le même besoin, car dans ma base de donnée je souhaite créer un Excel avec des données provenant de la base.
Lorsque je lance ma fonction une fois, elle fonctionne et me créer un Excel. Mais à la seconde execution (sans changer, ni les donnée, ni le code) la fonction bug sur un Range et un processus EXCEL.EXE est visible dans le gestionnaire des taches alors que je n'est aucun Excel d'ouvert (du moins de visible...)

Pourtant à la fin de ma fonction je ferme mon workbook et l'Objet "application excel" :

xlBook.Close
xlApp.Quit

Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing

Je pense que le mieux est encore de tuer le processus directement...

garion28 · Answer

j'ai trouvé ca
vba.Interaction.Shell("TASKKILL excel.exe /F /IM")

une interaction avec l'invité de commande

si ca ne fonctionne pas rajoute cmd.exe devant le taskkill

Raph04 · Answer

En fait le lien donner plus haut est pas mal.
C'est un peu lourd, mais ça fonctionne... Le seul problème, c'est que je peux pas lancer ma fonction avec des Excel d'ouvert en même temps... Et en plus maintenant une fois sur 2 (avec un grande précision), toujours sur mon Range, il me fait une erreur en me disant que le server distant n'existe pas ou n'est pas diponible, alors que je travail en Local -_-...

Mais je comprend vraiment pas pourquoi il me laisse un processus à la fin de ma fonction... parce qu'à mon avis c'est ça qui fait buguer, du style de Excel qui porte le même nom.

'Initialisations
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add


'Creation de la feuille budget
Set xlSheet = xlBook.Worksheets.Add
xlSheet.Name = "Budget"

[...]
Fonctions...
[...]

xlApp.DisplayAlerts = False
xlBook.SaveAs chemin & "\Import\Budgets\Budgets " & Me.Liste_Annee.Value & " " & Format(Now, "yyyy-mm-dd - hhmmss") & ".xls"
xlBook.Close
xlApp.DisplayAlerts = True
xlApp.Quit

Abase.Close
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing


Et c'est pas la 1er fois que j'ai des problème sur les Ranges comme ça...

Comment tuer un processus en vba

6 réponses

Discussions similaires