One more question :-)

How can I check to see if my workbook is already open exclusive?

I am using this code to set my workbook exclusive.

Application.DisplayAlerts = False
'
Windows("JAX_PassCounts_v0.9.8.xls").Activate
ActiveWorkbook.ExclusiveAccess
Do
On Error Resume Next
ActiveWorkbook.Save
Loop Until ActiveWorkbook.Saved = True
'
Application.DisplayAlerts = True

How can I write in here that if the file is already exclusive to exit the sub?
I tried somthing like

If ActiveWorkbook.ExclusiveAccess = True then
Exit Sub
End If

But this did not work, it tried to set the file exclusive and errored out.

Thanks for any help!
--
Stephen