閱讀英文

共用方式為


Sheets.Add 方法 (Excel)

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

語法

運算式新增 (BeforeAfterCountType)

expression 代表 Sheets 物件的變數。

參數

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

傳回值

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

備註

如果同時省略 BeforeAfter,則會在使用中工作表之前插入新的工作表。

範例

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

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