如果要用VBA創建新的工作簿,可以使用Add方法,如下面的代碼。Excel自動將該工作簿命名為“BookN”,其中“N”是下一個可用的數字,同時新工作簿將成為活動工作簿。
Sub AddOne()
Workbooks.Add
End Sub
另外,創建新工作簿更好的方法是將其分配給一個對象變量。例如下例中,由Add方法返回的Workbook對象分配給了對象變量“NewBook”。然后,又設置了“NewBook ”的若干屬性。
Sub AddNew()
Set NewBook = Workbooks.Add
With NewBook
.Title = "圖書銷售目錄一覽表"
.Subject = "圖書銷售"
End With
End Sub
“Title”和“Subject”分別為工作簿的“標題”和“主題”屬性,可以在工作簿屬性的“摘要”選項卡中查看。
下面的代碼不僅創建了一個新工作簿的同時,還在工作簿中的第一個工作表前插入了一個名為“計算機類”的工作表,并將該工作表中的B2單元格賦值為“銷售數量”。
Sub CreateNewWorkBook()
Dim WBook As Workbook, WSheet As Worksheet
Set WBook = Workbooks.Add
Set WSheet = WBook.Worksheets.Add
WSheet.Name = "計算機類"
WSheet.Range("B2").Value = "銷售數量"
End Sub