サンプルマクロは、Sample.xlsという名前のブックが開かれて
いるかどうかを調べます。

Sub Sample()

    Dim myChkBook As Workbook

    On Error GoTo ErrHdl
    Set myChkBook = Workbooks("Sample.xls")

    MsgBox "開かれています。"
    Exit Sub
    
ErrHdl:
    MsgBox "開かれていません。"

End Sub

　同じように特定の名前のシートが存在するかどうかをチェックする場合にも、
「とりあえず選択してみて、選択できなかったら（エラーが起きたら）存在しない」
というように、「エラーが出るか、出ないか」で判断することができます。