
「新規ブックを作って保存して閉じる」という操作、普段は手動で数クリック必要ですよね。

VBAならこれを一発自動化できます。ファイル量産や定期レポート出力に便利です。
基本構文:
Sub CreateAndSaveBook()
Dim wb As Workbook
Set wb = Workbooks.Add
wb.SaveAs Filename:="C:\Users\Public\Documents\NewReport.xlsx"
wb.Close
End Sub

ポイント:
・ Workbooks.Add
… 新規ブックを作成
・ SaveAs
… ファイル名を指定して保存
・Close
… ブックを閉じる

応用として、日付をファイル名に埋め込む方法を紹介します。
wb.SaveAs "C:\Users\Public\Documents\Report_" & Format(Date, "yyyymmdd") & ".xlsx"



コメントを残す