VBA Code to see if MS Access is already open

zacl1217 · #1 (**permalink**) 05-21-04, 12:14

Does anyone know how to tell if MS Access is already running using vba code in MS Excel.

Thanks.

michelin man · #2 (**permalink**) 06-03-04, 09:54

i tried this in excel and it worked.

Code:

Sub usr_check()
Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")
    
    If fso.FileExists("c:\Batch_be.ldb") Then
        
           
            MsgBox "Access is open!"
        
    End If

End Sub

shades · #3 (**permalink**) 06-03-04, 11:41

Another way to activate it, if it is open, and open it, if it isn't open:

Code:

Sub StartAccess()
    Application.ActivateMicrosoftApp xlMicrosoftAccess
End Sub

Internet Services

Web Development

Digital Marketing

Consumer Tech