ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   existing file excel2000 macro (https://www.excelbanter.com/excel-programming/343198-existing-file-excel2000-macro.html)

רוזנט

existing file excel2000 macro
 
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

Patrick Molloy[_2_]

existing file excel2000 macro
 
If NOT Workbooks("Ttt.xls") Is Nothing Then

"רוז×*ט" 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


רוזנט

existing file excel2000 macro
 

hi patrick
i tried but i get the same msg either the file is open or not

Sub AAA()
On Error Resume Next
If Not Workbooks("filename.xls") Is Nothing Then
MsgBox "the file is open"
Exit Sub
Else
MsgBox "the file is not open"
End If

End Sub



"Patrick Molloy" wrote:

If NOT Workbooks("Ttt.xls") Is Nothing Then

"רוז×*ט" 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

existing file excel2000 macro
 
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


All times are GMT +1. The time now is 05:13 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com