对工作簿进行操作（add、open、copy、save、close）

Add方法创建工作簿或工作表

1、Add方法创建新的工作簿

语法：workbooks对象.add（temple）， 其中temple为参数可选

另外还可以指定工作簿中工作表数量，如：

Dim bbb As Workbook

Application.SheetsInNewWorkbook = 5

Set bbb = Workbooks.Add    

bbb.SaveAs fileName:="你好"

如果没有指定工作表数量，则默认创建空的工作簿

2、Add方法创建一个新工作表并使其成为活动工作表

语法：worksheets对象.Add(Before,After,Count,Type) ， 所有参数均可选

说明：

• 参数Before和参数After只能二选一。

• 参数Before指定一个工作表，新添加的工作表放置在该工作表之前。

• 参数After指定一个工作表，新添加的工作表放置在该工作表之后。

• 参数Count指定要添加的工作表数量，默认值为1。

  '在工作表最后插入3张工作表，多个参数要用逗号隔开
  Worksheets.Add after:=Worksheets(Worksheets.Count), Count:=3
  '当前活动工作表名字改为newsheet
  ActiveSheet.Name