Checking for Open Access Files in VBA

[daugelli]

I am trying to write a script in an Excel VB module that will allow me to check to see if an Access file is open before I attempt to open it from the script.

Thanks in advance for any and all help.

 

[daugelli]

I should be a little more specific. The current line of code I am using to open the database instance looks like this:

Set DB = DBEngine.OpenDatabase(accessFile)

DB is of type Database