If you are specifically interested in worksheets only, you can use a simple Evaluate call:
DIM SHEETNAME as STRING
IF Evaluate("ISREF('" & SHEETNAME & "'!A1)") = TRUE Then
'do stuff here if sheets exists
ELSE
'do stuff here if sheet does not exist
ENDIF