Sheets.Add 方法 (Excel)

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

語法

運算式。新增 (Before、 After、 Count、 Type)

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 支援與意見反應。