Testez si Excel a terminé sa séquence de démarrage / arrêt

J'utilise PowerShell pour automatiser certaines tâches Excel via COM, via un script PowerShell manière suivante:

 $xl = new-object -ComObject Excel.Application sleep 5 DO THINGS... $xl.quit() sleep 5 $null = [System.Runtime.Interopservices.Marshal]::ReleaseComObject($xl) [GC]::collect() 

Mon problème est que si je supprime le premier appel à sleep , Excel ne sera pas prêt à effectuer des tâches nécessitant des compléments et l'appel à $xl.quit() ne fonctionne pas et le process ne parvient pas à quitter, comme en témoignent:

 PS > Get-Process EXCEL Handles NPM(K) PM(K) WS(K) VM(M) CPU(s) Id ProcessName ------- ------ ----- ----- ----- ------ -- ----------- 784 104 104008 109380 944 3.21 5996 EXCEL 

De même, si je supprime le deuxième appel à l' sleep , Excel n'a pas le time de terminer l'arrêt et, finalement, il en résulte une boîte de dialog indiquant "Microsoft Excel a cessé de fonctionner …" et la prochaine fois que Excel démarre, un autre la boîte de dialog indique "Microsoft Excel n'a pas réussi à fermer correctement, Démarrer en mode sans échec?"

 function XLtest { $xl = new-object -ComObject Excel.Application $xl.quit() $null = [System.Runtime.Interopservices.Marshal]::ReleaseComObject($xl) [GC]::collect() } for($i=0;$i -lt 10; $i++){ XLtest } # generates multiple errors 

Évidemment, ce sont des problèmes que je veux éviter, mais la solution heuristique de l'appel du sleep 5 pourrait encore échouer à l'occasion. Existe-t-il un moyen de détecter quand Excel a terminé sa séquence de démarrage et est prêt à émettre des commands ( xl.quit() en particulier) et lorsque la séquence d'arrêt est terminée (c.-à-d. Lorsqu'il est correct d'appeler [System....Marshal]::ReleaseComObject($xl) ?

• Delphi – Modifier le titre du graphique dans Excel provoque AV – Mise à jour avec un échantillon complet
• Bibliothèque de type Excel / Delphi 2009 / type de variable incorrecte
• Utilisation de plusieurs classurs Excel dans Python
• Automation Excel De Python obtenant "TypeError: 'unicode' object n'est pas appelable" sur Range.Address
• Utilisation d'Office.Interop.Excel sur les machines où MS Office n'est pas installé

• Excel workbooks.saveas () erreur dans powershell
• Comment find Excel nommé Cell
• Ole Excel Delphi Date Problème
• Obtenir des données de l'application personnalisée dans EXcel
• Comment dire à Range.NumberFormat de simplement mettre datatables telles quelles?

 $xl = new-object -ComObject Excel.Application $xl.Calculate do while $xl.CalculationState <> xlDone: $xl.DoEvents: Loop $xl.quit() ... (do more things?) 

 $xl = new-object -ComObject Excel.Application do while not $xl.ready: $xl.DoEvents: Loop $xl.quit()