新しいシートを追加する


ワークブックに新しいシートを追加するコードは次の通りです。

機能.シート.S_作成(ワークブック As Workbook, Optional シート名) As Worksheet


このコードには二つの引数が必要です。

1,ワークブック As Workbook
  新しいシートを追加したいワークブックをここで指定します。

2,Optional シート名
  新しく追加するシートの名前をここで指定します。
  この引数は省略可能です(省略した場合、自動的に「Sheet1」というようなシート名になります)。


例えば「請求書」ブックに「作業用シート」という名前のシートを追加したい場合は以下のように記述します。

Dim 作業用シート As Worksheet
Set 作業用シート = 機能.シート.S_作成(Workbooks(“請求書”), “作業用シート”)