ワークブック(Workbook)の作成 | EXCE(エクセル)のVBA・マクロ

ワークブックの作成

Workbooks.Add

ワークブックを新規作成する関数です。作成したワークブックを保存する場合は、
Workbooks("ワークブック名").SaveAs で保存して下さい。

サンプルコード


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

新規作成したワークブックのブック名を取得
Dim bookname As String
Workbooks.Add
bookname = ActiveWorkbook.Name

プログラムの実行結果

ワークブックを新規作成+ワークブック名の取得


Private Sub CommandButton1_Click()
 Dim bookname As String
 Workbooks.Add  '新規ブック作成
 bookname = ActiveWorkbook.Name '新規ブック名の取得
 '新規ブックのA1セルに書き込み
 ActiveWorkbook.ActiveSheet.Range("A1").Value = bookname & " を新規作成"
End Sub

プログラムの実行結果

書籍 IT系資格統計解析データ分析マーケティング