Per scoprire lo stato di una particolare applicazione disponibile o in esecuzione in Microsoft Excel, dai un'occhiata a questo articolo. Utilizzeremo il codice VBA per verificare di restituire "True", se l'applicazione è disponibile o in esecuzione o restituire "False" in caso contrario.
Domanda: Vorrei avere una macro per identificare in background se l'applicazione specifica è in esecuzione o disponibile/installata nel sistema.
Per identificare l'applicazione Outlook è in esecuzione o disponibile; dobbiamo seguire i passaggi seguenti per avviare l'editor VB:
- Fare clic sulla scheda Sviluppatore
- Dal gruppo Codice seleziona Visual Basic
- Fare clic su Inserisci quindi Modulo
- Questo creerà un nuovo modulo
- Inserisci il seguente codice nel Modulo
Funzione ApplicationIsRunning(ApplicationClassName As String) As Boolean ' restituisce True se l'applicazione è in esecuzione ' esempio: If Not ApplicationIsRunning("Outlook.Application") Then Exit Sub Dim AnyApp As Object On Error Riprendi Avanti Imposta AnyApp = GetObject(, ApplicationClassName) ApplicationIsRunning = Non AnyApp non è impostato nulla AnyApp = Niente in caso di errore GoTo 0 End Function
Funzione ApplicationIsAvailable(ApplicationClassName As String) As Boolean ' restituisce True se l'applicazione è disponibile ' esempio: If Not ApplicationIsAvailable("Outlook.Application") Then Exit Sub Dim AnyApp As Object On Error Resume Next Set AnyApp = CreateObject(ApplicationClassName) ApplicationIsAvailable = Not AnyApp Is Nothing Imposta AnyApp = Nothing On Error GoTo 0 End Function
- In ogni cella è necessario inserire la formula come segue per verificare se l'applicazione Outlook è installata sul pc
- =ApplicationIsAvailable("Outlook.Application")
- Per determinare se l'applicazione Outlook è attualmente in esecuzione o meno; in qualsiasi cella inserisci la formula come =ApplicationIsRunning("Outlook.Application")
Conclusione: In questo modo possiamo controllare lo stato di installazione dell'applicazione specifica e se è in esecuzione o meno.
Se ti è piaciuto il nostro blog, condividilo con i tuoi amici su Facebook. E puoi anche seguirci su Twitter e Facebook.
Ci piacerebbe avere tue notizie, facci sapere come possiamo migliorare, completare o innovare il nostro lavoro e renderlo migliore per te. Scrivici al sito di posta elettronica