Innehållsförteckning
Denna kod kontrollerar om en Office -app körs. Om appen inte körs öppnas appen.
Kontrollera om Microsoft Word -programmet är öppet
1234567891011121314 | Sub Check_If_App_Is_Open ()'Kontrollera om Microsoft Word körswApp = "Word.Application"If IsAppRunning (wApp) = True ThenMsgBox "Word is running"AnnanMsgBox "Word is Not running"'Skapa en ny instansAnge oApp = CreateObject (, wApp)Avsluta omAvsluta Sub |