Thanks JP...
What I am finding is there are some other things going on with this workbook
too...
If I copy the workbook to a local drive I get this XLQUERY.XLA missing
message:
http://support.microsoft.com/kb/277620
Although the workaround doesn't...
But having it work from the local drive indicates a network (OpLocks)
problem.
In VBA terms, it would be part of the Workbooks collection.
If you were so inclined, here is a UDF (User Defined Function) that
would tell you if a specific book is open.
Function IsOpen(wbook As String) As Boolean
Dim wb as Excel.Workbook
IsOpen = False
On Error Resume Next
Set wb = Workbooks(wbook)
If Err = 0 then
IsOpen = True
End If
On Error Goto 0
Exit Function
HTH,
JP