シートを削除する際に

Sheets("シート名").Select
ActiveWindow.SelectedSheets.Delete

と普通にマクロの記録で書くと、
「選択したシートに、データが〜〜[削除]をクリックしてください]
というメッセージがでますが、それを出ないようにするか、
自動に[削除]をクリックすることはできますか？