Indholdsfortegnelse
Denne kode kontrollerer, om en Office -app kører. Hvis appen ikke kører, åbner den appen.
Kontroller, om Microsoft Word -applikationen er åben
1234567891011121314 | Sub Check_If_App_Is_Open ()'Kontroller, om Microsoft Word kørerwApp = "Word.Application"Hvis IsAppRunning (wApp) = True derefterMsgBox "Word is running"AndetMsgBox "Word kører ikke"'Opret en ny forekomstIndstil oApp = CreateObject (, wApp)Afslut HvisAfslut Sub |