I am building an excel application which draws it's information from another
workbook called "NSRDB.xlsx.  I need to find some code to include in some of
the macros, which checks if NSRDB.xlsx is already open by other users on our
network. I used to use the following:

'Application.DisplayAlerts = False

'Workbooks.Open_
Filename:="\\Caffeine\a3_personnel_management\NSRDB\NSRDB.xlsx"

If ActiveWorkbook.ReadOnly Then ActiveWindow.Close: GoTo AlertMessage

Is there any code I can use which will check if the file is open, regardless
of whether it is open as read-only or open otherwise.

Any help you can provide is greatly appreciated.

Grant W