Test to see if a spreadsheet window is open

[lopsided]

Dear all,

Part of my macro calls a cell value on one sheet to switch between open
windows. If the value is not typed in correctly on the first sheet then
the macro gives the error "subscript out of range", and is unable to
open the other sheet.

How can I put a test in my macro to check to see if an error will be
produced when the line is run?

I tried (amongst others):

If IsError(windows(sheetname).activate) then etc.


Any help would be greatly appretiated.

Tom

 

[arno]

Hi,

first loop throug all your windows with something like
Sub test()
For Each myWindow In Application.Windows
If myWindow.Caption = "test.xls" Then
found = True
End If
Next

If found = True Then
'...do something
Else
'... show an error message
End If
End Sub

regards

arno

 

[lopsided]

That worked perfectly
Thanks a lot!

Tom