Handle with activating of nonexisting sheet

[Paleo]

Hi,

Is there a way to handdle the error when I command

Sheets("Test").Activate
and there is no sheet called Test?

I would rather a solution that didnt include a for ... each passing through each sheet in the workbook if its possible.

[Jacob Hilderbrand]

Try this.


Dim WS As Worksheet
On Error Resume Next
Set WS = Sheets("Test")
On Error Goto 0
If WS Is Nothing Then
'No Sheet
Else
'Sheet Exists
End If

[Paleo]

Hi Jake,

great, worked just fine!

Thanks a lot!

[Jacob Hilderbrand]

You're Welcome :beerchug:

Take Care