【VBA】アクティブシートを削除する

ActiveSheet.Deleteで削除

アクティブシートを削除したい時は、ActiveSheet.Deleteで削除できます。

'警告メッセージを表示しない
Application.DisplayAlerts = False

'アクティブシートを削除
ActiveSheet.Delete

'警告メッセージを表示
Application.DisplayAlerts = True

'警告メッセージを表示しない

Application.DisplayAlerts = False

'アクティブシートを削除

ActiveSheet.Delete

'警告メッセージを表示

Application.DisplayAlerts = True

アクティブシートを削除する命令の前後では、Application.DisplayAlertsを使って、シート削除の確認メッセージを表示しないようにしています。

注意すること
ブックからすべてのシートを削除することはできません。
そのため、シートが１つしかないブックで、アクティブシートを削除しようとするとエラーが発生します。

その他テクニックは、次の記事を参考にしてください。