Excelブックを上書き保存する
<< エクセルVBAでExcelブックを閉じる :前の記事
こちらでは、WorkbookオブジェクトのSaveメソッドを利用して、Excelブックを上書き保存する方法について解説しています。
メソッドとは、オブジェクトを操作する命令文のことでオブジェクトの動作になります。 メソッドを利用するにはオブジェクト名とメソッド名の間に「.(ピリオド)」で結んで記述します。
オブジェクト名.メソッド名
目次
はじめに
こちらでは、Saveメソッドを利用したExcelのブックを上書き保存する方法について解説します。
利用するメソッドについて
今回利用するメソッドは以下になります。- Saveメソッド
Saveメソッドとは
WorkbookオブジェクトのSaveメソッドは指定したブックを上書き保存します。Saveメソッドには引数はありません。
指定したブックを上書き保存するサンプルコード
今回のVBAコードはExcelの指定したブックを上書き保存するマクロになります。
Sub sample()
Workbooks("Book1").Save
End Sub
実行結果
「Book1」ブックが上書き保存されます。
解説
sampleプロシージャのSubステートメントに引数は設定されていません。WorkbookオブジェクトのSaveメソッドには、引数はありませんので、こちらを実行するとブックが上書き保存されます。そして、最後はEndステートメントを利用してsampleプロシージャを終了させます。
SaveメソッドはCloseメソッドのようなブック変更の有無に対応した引数がないため、ブック変更の有無に関わらず上書き保存されます。ですので、新規ブックの場合はファイル名は初期のままで新規作成されます。
ちなみに「Excelブックを閉じる」の開いている全てのブックを閉じるサンプルコードでは、Workbooksコレクションオブジェクトに対してCloseメソッドを設定しましたが、WorkbooksコレクションオブジェクトにはSaveメソッドはありません。
開いている全てのブックを上書き保存したい場合は、For Each~Nextステートメントを利用して処理することができます。
Sub sample()
Dim wb As Workbook
For Each wb In Application.Workbooks
wb.Save
Next wb
End Sub
まとめ
今回は、WorkbooksコレクションオブジェクトのSaveメソッドを利用して、Excelのブックを上書き保存する方法について解説しました。次回は、エクセルVBAでExcelブックを別名で保存する方法について解説します。
エクセルVBAのブック操作一覧
次の記事: エクセルVBAでExcelブックを別名で保存する >>
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。