Dim wkbk as Workbook
On Error Resume next
set wkbk = workbooks("MyWorbook.xls")
On Error goto 0
if wkbk is nothing then
msgbox "It isn't open"
End if


--
Regards,
Tom Ogilvy


big G wrote in message
...
Is there a simple way in VBA to determine if a workbook of a specific name
is open?