【簡単Excelマクロ・VBA】新規ファイル（ワークブック）の作成方法｜ファイル操作 #001

2024年5月30日 2024年11月8日

運営者・ポテ

アフィリエイト広告を利用しています。

いつもありがとうございます。

ノンプログラマー向け「Excelマクロ・VBA解説シリーズ」へようこそ。

本稿では、「新規ファイル（ワークブック）を作成する方法」を解説いたします。とてもシンプルなコードです。

ことばの意味

ノンプログラマー
プログラミングを主な仕事にしていない人たちのことです。
マクロ
VBAを使って作成される「機能」のことです。
VBA
Visusal Basic for Application の略で、プログラミング言語のことです。
ワークブック
Excelファイルのことです。

Contents

VBAにおけるファイル操作の全体像
VBAで新規ファイル（ワークブック）を作成する方法
おわりに
VBAプログラミングスキルアップのための参考情報
- VBAプログラミングのスキルアップ
- プログラミングの一般教養

VBAにおけるファイル操作の全体像

VBAにおける「ファイル操作」の全体像は以下の記事で解説しております。

【Excelマクロ・VBA】Excelマクロ・VBAの全体像 | みんなの実用学 (jitsuyogaku.com)

本稿では「ファイル操作」の一部である「新規ファイル（ワークブック）の作成方法」を解説いたします。

VBAで新規ファイル（ワークブック）を作成する方法

新規ファイル（ワークブック）を作成するコードを以下に示します。

Sub sample1()

' 新規ワークブックの作成
Workbooks.Add

End Sub

これを実行すると以下のようなファイル（ワークブック）が立ち上がります。

これで終わりなのですが、あまりにあっけないですね・・・。

これでは申し訳ないので、もう少し続けます。

実際の場面では新規にファイル（ワークブック）を作成するだけで終わるマクロは少なく、作成したファイル（ワークブック）に何かしらの操作を加えるでしょう。

作成したファイル（ワークブック）に何らかの操作を加えるためには、まず作成したファイル（ワークブック）をオブジェクト変数として取得しておくのが通常です。

新規にファイル（ワークブック）を作成し、それをオブジェクト変数として取得するには以下のようにコードを記述します。

' 変数宣言
Dim new_wb As Workbook


' 新規ワークブックを作成すると同時にオブジェクト変数として取得する
Set new_wb = Workbooks.Add

これで、オブジェクト変数 new_wb（つまり、新規に作成した新規ファイル）に対して、命令していくことが出来るようになりました。

例として、new_wb のシートにコメントを入力し、デスクトップに保存するコードを実装してみましょう。各行のコードの意味はコードの上の行に記載したコメントをご参照ください。

Sub sample2()

' 変数宣言
Dim new_wb As Workbook


' 新規ワークブックを作成すると同時にオブジェクト変数として取得する
Set new_wb = Workbooks.Add


' セルにコメントを入力する
new_wb.Worksheets(1).Cells(1, 1) = "これはマクロで作成した新規ワークブックです。"


' 新規ワークブックをデスクトップに保存する
new_wb.SaveAs Environ("USERPROFILE") & "\Desktop\new_wb.xlsx"


' 新規ワークブックを閉じる
new_wb.Close


End Sub

これを実行すると、以下のようなファイルがデスクトップに保存されます。