HOME > 即効テクニック > Excel VBA > シート操作関連のテクニック > 特定の名前のシートを無条件に削除する

即効テクニック

シート操作関連のテクニック

特定の名前のシートを無条件に削除する

(Excel 97/2000)
サンプルマクロは、NoUseという名前のシートをシートを警告なしに削除します。
ただし、シートが1枚しか存在しない場合には削除できません。
Sub Sample()

    On Error Resume Next
    With Application
        .DisplayAlerts = False
        Sheets("NoUse").Delete
        .DisplayAlerts = True
    End With

End Sub