excel利用VBA创建新的工作簿

excel利用VBA创建新的工作簿

如果要用VBA创建新的工作簿，可以使用Add方法，如下面的代码。Excel自动将该工作簿命名为“BookN”，其中“N”是下一个可用的数字，同时新工作簿将成为活动工作簿。

Sub AddOne()Workbooks.AddEnd Sub

另外，创建新工作簿更好的方法是将其分配给一个对象变量。例如下例中，由Add方法返回的Workbook对象分配给了对象变量“NewBook”。然后，又设置了“NewBook ”的若干属性。

Sub AddNew()Set NewBook = Workbooks.AddWith NewBook.Title = "图书销售目录一览表".Subject = "图书销售"End WithEnd Sub

“Title”和“Subject”分别为工作簿的“标题”和“主题”属性，可以在工作簿属性的“摘要”选项卡中查看。

下面的代码不仅创建了一个新工作簿的同时，还在工作簿中的第一个工作表前插入了一个名为“计算机类”的工作表，并将该工作表中的B2单元格赋值为“销售数量”。

Sub CreateNewWorkBook()Dim WBook As Workbook, WSheet As WorksheetSet WBook = Workbooks.AddSet WSheet = WBook.Worksheets.AddWSheet.Name = "计算机类"WSheet.Range("B2").Value = "销售数量"End Sub