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

サンプルマクロは、ブック内にSampleという名前のシートがあるかどうかを調べます。
通常のワークシートだけでなく、グラフシート、モジュールシート等もチェックを行います。

Sub Sample()

    Dim myChkSht As Worksheet

    On Error GoTo ErrHdl
    Set myChkSht = Sheets("Sample")

    MsgBox "存在します。"
    Exit Sub
    
ErrHdl:
    MsgBox "存在しません。"

End Sub