確認メッセージを表示しない

確認メッセージを表示せずにブックを閉じる

・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・
Sub bookを閉じる()
  Workbooks("ABC.xls").Close SaveChanges:=True
End Sub
・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

SaveChanges:=True・・・・・・・・・確認メッセージを表示せずにブックを閉じるには、Closeメソッドに引数「SaveChanges」を指定します。

確認メッセージを表示せずにシートを削除する。

・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・
Sub シートの削除()
Application.DisplayAlerts = False
Workshets("Sheet1").Delete
Application.DisplayAlerts = True
End Sub
・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

DisplayAlertsプロパティ
DesplayAlertsプロパティにFalseを代入すると、シートを削除する時だけではなく、同名のファイルを保存する時に表示される様々な確認・警告のメッセージを非表示にすることが出来ます。
なお、DisplayAlertsプロパティの規定値はTrueなので、Falseを代入してもプロシージャの実行が終了したら自動的にTrueに戻ります。しかし念の為にプロシージャの中でTrueに戻したほうがいいでしょう。

ブックを保存しないで閉じる

・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・
Sub ブックを閉じる()
  Workbooks("ABC.xls").Close False
End SUb
・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

Closeメソッドの引数にFalseを指定すると、ブックは保存されずに閉じられます。
また、確認メッセージも表示されません。