You could just put what you want in the appropriate Then/Else portion of your
code.

Option Explicit
Sub testme()

Dim myWkbk As Workbook

Set myWkbk = Nothing
On Error Resume Next
Set myWkbk = Workbooks("TTT.xls")
On Error GoTo 0

If myWkbk Is Nothing Then
'do something
Else
'do something else
End If

End Sub

????? wrote:

if i want to check if a file is not open the macro is
If Workbooks("Ttt.xls") Is Nothing Then.....

but when i want to write it in the opposit
like: If Workbooks("Ttt.xls") Is exist Then.....
this macro did not work
what is the correct macro to the opposit of " Is Nothing"

thank you
rozent

--

Dave Peterson