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

Take Care