スキルアップ・問題解決なら、モーグにおまかせ！

サンプルマクロは、testという名前のワークシートが存在するかどうかを判定します。グラフシートやモジュールシートは判定されません

Sub Sample()

    Dim mySht As Worksheet

    On Error GoTo ErrHdl
    Set mySht = Worksheets("test")
    MsgBox "シート""test""は存在します。"
    Exit Sub
    
ErrHdl:
    MsgBox "シート""test""は存在しません。", vbExclamation

End Sub