Excel VBA 编程 新建和删除工作表 当用户制作的报表中工作表的数量超过 3 个,可以为工作簿新建工作表。 另外,对于工作簿 中不需要的工作表,可以将其删除,以方便用户查看其他工作表中的数据。 1.新建工作表 无论工作簿中工作表的数量有多少个, 为了在这些工作表的最后添加一个工作表, 可以使用 Add方法来实现,其代码如下: Sub 新建工作表 () Sheets.Add After:=Sheets(Sheets.Count) End Sub 在上面的代码中使用 Sheets.Count 属性进行返回一个 Long 值,它代表集合中对象的数量。 语法: 表达式 .Count 另外,为了在选择的工作表之前插入一个工作表, 可以输入以下代码。 然后,在运行程序之 前,首先选择指定的工作表,当运行之后,即可在该工作表之前添加一个工作表。 Sub 新建 () Sheets.Add