Why would one want to avoid an on Error block by replacing it with a slower
approach like looping through all the workbooks? Is there a technical
reason or just personal preference?

--
Regards,
Tom Ogilvy

tolgag wrote in message
...
If you want to avoid use an On Error block, try following function :

Function IsWBOpen(strName As String) as Boolean

Dim w as Workbook,
Dim bResult as Boolean

bResult = False

For each w in Workbooks
if w.name = strName then
bResult = True
exit for
end if
Next

IsWBOpen = bResult

End Function


---
Message posted from http://www.ExcelForum.com/