本示例将新建工作表插入到活动工作簿的最后一张工作表之前。

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。