RE:Como saber si se esta utilizando una aplicación
Es una función Api que te devuelve el hwnd de la aplicación que buscás,
pasándole los parámetrso String de "clase" o "título de la ventana"
' En declaraciones
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub Form_Load( )
Dim WinWnd as Long
´Buscamos por ejemplo si está activo el Word
'El valor vbNullString pasa una cadena nula a la Función, o en su defecto podés poner 0&
WinWnd = FindWindow(vbNullString, "Microsoft Word - Documento1")
If WinWnd = 0 Then
MsgBox "Word no está abierto"
Unload Me
else
MsgBox "Word está abierto"
endif
End Sub
Supongo que era esto lo que necesitabas.
Mucha suerte.