Excel VBA シートを削除する前に操作する-BeforeDelete

Excel VBAでシートを削除する前に操作する方法の記録です。

シートを削除する前に何か操作をさせたい場合は「BeforeDelete」イベントを使います。

< スポンサーリンク >

「BeforeDelete」構文

ワークシートが削除される前に発生します。

シートを削除する前に操作する例

VBEでオブジェクト欄の「(General)」と表示してあるプルダウンの部分を「Wordsheet」を選択し、プロシージャ欄を「BeforeDelete」を選択します。

「Private Sub Worksheet_SelectionChange・・・End Sub」の部分は必要ないので削除します。

シートが削除される前に「シート名を削除します」というメッセージを表示してみます。

Private Sub Worksheet_BeforeDelete()
  MsgBox ActiveSheet.Name & "を削除します"
End Sub

シートを削除してみます。

［削除］をクリックします。

VBAで設定したメッセージが表示され

シートが削除されました。