摘要： 在VBA中，可以用Sheets.Add 方法在工作簿中新建工作表。其语法是： Sheets.Add(Before, After, Count, Type)
其中参数Before、After指定新建工作表的位置，Coun指定工作表的数量，Ty...
在VBA中，可以用Sheets.Add 方法在工作簿中新建工作表。其语法是：
Sheets.Add(Before, After, Count, Type)
其中参数Before、After指定新建工作表的位置，Coun指定工作表的数量，Type指定新建工作表的类型。如下例：
在工作簿新建一个名称为“工作表1”的工作表：
Sub AddWorksheet()
On Error Resume Next
Worksheets.Add().Name = "工作表1"
End Sub
如何利用VBA获取指定工作簿中的工作表名称
如果需要用VBA的方法获得某个工作簿中工作表的名称，可以使用下面的代码，其中使用了 Microsoft ActiveX Data Objects (ADO)，可以将指定工作簿中的工作簿名称显示在A列中，在使用时需将代码中的工作簿名称及路径进行更改。 Sub GetSheetNames() Dim objConn As
在最后一个工作表的后面新建名称为“工作表2”的工作表：
Sub AddWorksheetAfterLast()
On Error Resume Next
Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = "工作表2"
End Sub
在最后一个工作表的前面新建4个工作表：
Sub Add4Worksheets()
Worksheets.Add Before:=Worksheets(Worksheets.Count), Count:=4
End Sub
运行下面的代码中，首先给出一个提示，要求用户输入新建工作表的名称，然后用该名称新建工作表。如果出现错误，如名称过长或该名称已被使用，将直接新建一个工作表。
Sub AddNameNewSheet()
Dim NewName As String
NewName = InputBox("请输入新建工作表的名称。")
On Error Resume Next
Sheets.Add.Name = NewName
End Sub
VBA中Activate方法和Select方法的区别
VBA中的Activate方法和Select方法看起来似乎相同，其实二者是有区别的。Activate方法的作用是激活，而Select方法的作用是选择。其区别如下： 1.对于“Sheets”对象 Sheets.Select可以同时选择多个工作表，而Sheets.Active不能同时激活多个工作表。
