Eu faria uma função separada para isso:
Function SheetExists(SheetName As String)
On Error GoTo no:
WorksheetName = Worksheets(SheetName).Name
SheetExists = True
Exit Function
no:
SheetExists = False
End Function
Depois, você pode chamá-lo quando necessário, mesmo em uma fórmula, se quiser:
Sub ABC()
If SheetExists("Test") Then
MsgBox "Yay!"
Else
MsgBox "Boo!"
End If
End Sub
ou
=If(SheetExists("Test"),"Yay!","Boo")