Handle with activating of nonexisting sheet

Hi,

Is there a way to handdle the error when I command

Code:

---

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.

Try this.

Code:

---

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

---

Hi Jake,

great, worked just fine!

Thanks a lot!

You're Welcome :beerchug:

Take Care