Table des matières
Ce code vérifiera si une application Office est en cours d'exécution. Si l'application n'est pas en cours d'exécution, elle ouvre l'application.
Vérifiez si l'application Microsoft Word est ouverte
| 1234567891011121314 | Sous-Check_If_App_Is_Open()'Vérifier si Microsoft Word est en cours d'exécutionwApp = "Mot.Application"Si IsAppRunning(wApp) = True AlorsMsgBox "Le mot est en cours d'exécution"AutreMsgBox "Le mot n'est pas en cours d'exécution"'Créer une nouvelle instanceDéfinir oApp = CreateObject (, wApp)Fin siFin du sous-marin |
