Learning Note

できるようになったことを記録しています

ブックを閉じる

ブックを閉じるにはCloseメソッドを使用します。

Workbooks("ブック名.xlsx").Close


また、引数により保存して閉じる、保存しないで閉じる、名前を付けて保存を選択することができます。

引数 定数 内容
SaveChanges True ブックの変更を保存して閉じます。
False ブックの変更を保存せずに閉じます。
省略 ファイル名の入力を促すダイアログ ボックスが表示されます。
FileName ファイル名 指定されたファイル名で、変更したブックを保存します。

使用例

Sub Main()
    Dim WB As Workbook
    Set WB = ActiveWorkbook

    Application.Quit '保存と同時にExcelを終了させる
    WB.Close savechanges:=True
End Sub

"Application.Quit"の記述は気持ち的にWB.close処理の後に書きたいが、そうするとExcelが終了せずに残ってしまう。そういうもの?