Sheets.Add 方法 (Excel)

建立新的工作表、圖表或巨集工作表。 新的工作表會成為現用工作表。

語法

表達。新增 (之前、之後、計數、鍵入)

expression 代表 Sheets 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Before	選用	Variant	指定工作表的物件，在此工作表之前會插入新的工作表。
After	選用	Variant	指定工作表的物件，在此工作表之後會插入新的工作表。
Count	選用	Variant	要新增的工作表數目。 預設值是所選圖紙的數目。
類型	選用	Variant	指定工作表類型。 可以是下列其中一個 XlSheetType 常數： xlWorksheet、 xlChart、 xlExcel4MacroSheet 或 xlExcel4IntlMacroSheet。 如果是根據現有範本插入工作表，則請指定範本的路徑。 預設值為 xlWorksheet。

傳回值

物件值，代表新的工作表、圖表或巨集工作表。

備註

如果同時省略 Before 及 After，則會在使用中工作表之前插入新的工作表。

範例

這個範例會在現用活頁簿中最後一張工作表之前插入新的工作表。

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

此範例會在作用中活頁簿中的最後一個工作表之後插入新的工作表，並在區域變數中擷取傳回的物件參考。

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

注意事項

在 32 位元的 Excel 2010 中，這個方法無法一次建立超過 255 個工作表。

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。