主题：合并工作簿

WorkBook

WorkBook对象代表Microsoft Excel工作簿，它在Application对象的下一层。WorkBook是WorkBooks集合的成员。

常用方法

• Add
  
  创建新的工作簿。如下面的代码，就将新建一个工作簿，该工作簿的第一个工作表的名称改为hhh，同时在A1单元格写入“hhh123”，然后保存为D:\123.xls。
  
  Dim App As New MSExcel.Application
  Dim Wb As MSExcel.Workbook = App.WorkBooks.Add
  Wb.WorkSheets(1).name = "hhh"
  Wb.WorkSheets(1).range("A1").Value = "hhh123"
  Wb.SaveAs("d:\123.xls")
  App.Quit
  
  需要说明的是，在创建新工作簿后，该工作簿就成为活动工作簿。