Comment fermer un fichier ouvert avec un script Windows?

Question

Je souhaite configurer un script à exécuter quotidiennement en tant que tâche planifiée Windows. Le script doit ouvrir une feuille de calcul Excel, attendre l'exécution d'une macro (configurée pour s'exécuter chaque fois que la feuille de calcul est ouverte), puis fermer le fichier une fois la macro terminée, en enregistrant les modifications. La macro elle-même ne prendra pas très longtemps à courir. Si mon script peut attendre environ une minute avant de fermer à nouveau le fichier, cela devrait suffire.

Answer 1

Code non testé complètement et la plupart du temps écrit de mémoire, mais assez je l'espère pour vous lancer:

Set app = GetObject(, "Excel.application") ' assumes Excel is already running, otherwise use Set app = CreateObject("Excel.Application") 
app.Visible = True ' useful while testing 
app.run "MyMacro", "Param1" ' run the MyMacro macro with a string parameter "Param1" 
WScript.Sleep(60000) ' wait 60,000 ms = 1 minute 
app.ActiveDocument.Close 
app.Quit 
Set app = Nothing