Sheets.Add メソッド (Excel)Sheets.Add method (Excel)

新しいワークシート、グラフ、またはマクロ シートを作成します。Creates a new worksheet, chart, or macro sheet. 新しいワークシートがアクティブ シートになります。The new worksheet becomes the active sheet.


追加(BeforeAfterCountType)expression.Add (Before, After, Count, Type)

expressionSheets オブジェクトを表す変数です。expression A variable that represents a Sheets object.


名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
BeforeBefore オプションOptional VariantVariant 指定したオブジェクトのシートの直前に、新しいグラフ シートを追加します。An object that specifies the sheet before which the new sheet is added.
AfterAfter オプションOptional VariantVariant 指定したオブジェクトのシートの直後に、新しいグラフ シートを追加します。An object that specifies the sheet after which the new sheet is added.
CountCount オプションOptional VariantVariant 追加するシートの数を指定します。The number of sheets to be added. 既定値は、選択されたシートの数です。The default value is the number of selected sheets.
TypeType 省略可能Optional VariantVariant ワークシートの種類を指定します。Specifies the sheet type. XlxlExcel4MacroSheet type 定数は、次のいずれかを指定できます: xlworksheetxlchart、 ****、またはxlExcel4IntlMacroSheetCan be one of the following XlSheetType constants: xlWorksheet, xlChart, xlExcel4MacroSheet, or xlExcel4IntlMacroSheet. 既存のテンプレートに基づいたシートを挿入する場合は、そのテンプレートのパスを指定します。If you are inserting a sheet based on an existing template, specify the path to the template. 既定値は xlWorksheet です。The default value is xlWorksheet.

戻り値Return value

新しいワークシート、グラフ、またはマクロ シートを表すオブジェクト値。An Object value that represents the new worksheet, chart, or macro sheet.


引数 Before と引数 After を共に省略すると、作業中のシートの直前に新しいシートが追加されます。If Before and After are both omitted, the new sheet is inserted before the active sheet.


次の使用例は、作業中のブックの最後のシートの前に新しいワークシートを追加します。This example inserts a new worksheet before the last worksheet in the active workbook.

ActiveWorkbook.Sheets.Add Before:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)

次の使用例は、作業中のブックの最後のワークシートの後に新しいワークシートを挿入し、返されたオブジェクト参照をローカル変数に格納します。This example inserts a new worksheet after the last worksheet in the active workbook, and captures the returned object reference in a local variable.

Dim sheet As Worksheet
Set sheet = ActiveWorkbook.Sheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count))


32 ビット版の Excel 2010 では、この方法は一度に 255 を超えるシートを作成できません。In 32-bit Excel 2010, this method cannot create more than 255 sheets at one time.

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.