【VBA】Excelファイルを上書き保存する方法(Saveメソッド)

2023年9月9日

今回はVBAでExcelファイルを上書き保存する方法を紹介します｡

この記事では↓の内容が分かります｡

上書き保存する方法
保存後にファイルを閉じる方法
保存時の警告メッセージを無視する方法

Excelファイルを上書き保存する方法(Saveメソッド)

Sub Sample1()
    
    'アクティブなExcelファイルを上書き保存
    ActiveWorkbook.Save
    
    'アクティブなExcelファイルを閉じる
    ActiveWorkbook.Close
End Sub

Excelファイルを上書き保存するには､WorkbookのSaveメソッドを使います｡

サンプルコードではアクティブなExcelファイルを上書き保存しています｡

また､上書き保存してファイルを閉じてしまいたい時は､WorkbookのCloseメソッドを使いましょう｡

このコードでは上書き保存をした後に､そのままExcelファイルを閉じるようにしています｡

ちなみに上書き保存ではなく､名前を付けて保存をしたいときはSaveAsメソッドを使います｡

警告メッセージを無視する方法

上書き保存をするときに､すでに同じ名前のファイルがあると警告メッセージが表示されます｡

Excelファイルを新規作成して「Book1.xlsx」で上書き保存しようとすると同名ファイルがあるかもしれません。

Sub Sample2()
    
    '警告メッセージを表示しない
    Application.DisplayAlerts = False
    
    'アクティブなExcelファイルを上書き保存
    ActiveWorkbook.Save
    
    '警告メッセージを表示する
    Application.DisplayAlerts = True
End Sub

この警告メッセージを表示させないためには、「Application.DisplayAlerts = False」とします。

Falseとすると警告メッセージが表示されません｡

Falseとした後に上書き保存をして､最後にTrueへ戻せば警告メッセージを表示させることなく上書き保存ができます｡