excel運用VBA創建新的工作簿

?如果要用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