【VBA】複数のワークシートをまとめて追加する

Count:=数値でシートを追加

Worksheets.Addで新しいシートを追加する時に、「Count:=数値」を指定します。

指定した数値の数だけシートが追加されます。

'ワークシートを２つ追加
Worksheets.Add Count:=2

1 2	'ワークシートを２つ追加 Worksheets.Add Count:=2

サンプルコードでは、Count:=2となっているので、シートが２枚追加されます。

追加するシートの数だけ同じ命令(Worksheets.Add)を書かなくてOKです。１行の命令で、まとめてシートを追加できます。

POINT

必要なシート数がわかっているなら、1つずつ追加するのではなく、最初にまとめてシートの追加処理を行うとプログラムが見やすくなります。

その他テクニックは、次の記事を参考にしてください。