Vba: ワークブックを保存して閉じる方法 (例付き)

VBA で次の構文を使用して、ブックを保存して閉じることができます。

 SubSaveClose ()

ActiveWorkbook.Close_
SaveChanges:=True, _
Filename:=" C:\Users\bob\Desktop\MyExcelFile.xlsx "

End Sub

この特定のマクロは、現在アクティブなワークブックへの最新の変更を保存してから、ワークブックを閉じます。

Filenameステートメントは、ワークブックを保存する場所を指定します。

ブックを閉じる前に変更を保存したくない場合は、代わりにSaveChanges:=Falseステートメントを使用できることに注意してください。

次の例は、この構文を実際に使用する方法を示しています。

例: VBA を使用してワークブックを保存して閉じる

次の Excel ワークブックを開いて表示しているとします。

このブックに加えた最新の変更をデスクトップに保存したいとします。

これを行うには、次のマクロを作成できます。

 SubSaveClose ()

ActiveWorkbook.Close_
SaveChanges:=True, _
Filename:=" C:\Users\bob\Desktop\MyExcelFile.xlsx "

End Sub

このマクロを実行すると、最新の変更が保存され、ブックが自動的に閉じられます。

次に、コンピューターのデスクトップに移動して、保存されている Excel ワークブックを見つけることができます。

Filenameステートメントを使用して指定したように、ブックはMyExcelFile.xlsxとして保存されました。

注: VBA のWorkbook.Closeメソッドの完全なドキュメントは、ここで見つけることができます。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBA: ワークブック内のシート数を数える方法
VBA: 別のブックからデータを抽出する方法
VBA: 新しいシートを追加する方法