vba学习笔记1 新建工作簿_vba新增工作簿并命名

1. 创建新的 Workbooks 。创建的 workbook 名称为Book1，Book2，Book3依次递增

'若要在 Visual Basic 中创建新的工作簿，请使用 Add 方法。下述过程创建了新的工作簿。
'Microsoft Excel 自动将该工作簿命名为“BookN”，其中“N”是下一个可用的数字。新工作簿将成为活动工作簿。
Sub AddOne()
    Workbooks.Add
End Sub
1
2
3
4
5

2. 创建新的 Workbooks 。创建的 workbook 名称为Allsales.xlsx，Title(タイトル) 为All Sales，Subject(件名) 为Sales。
   创建之后的路径在C:\Users\xxx\Documents（xxx为用户名的下面）。

'创建新工作簿更好的方法是将其分配给一个对象变量。下例中，由 Add 方法返回的 Workbook 对象分配给了对象变量 newBook。
'然后，又设置了 newBook 的若干属性。使用对象变量可以很容易地控制新工作簿。
Sub AddNew()
Set NewBook = Workbooks.Add
    With NewBook
        .Title = "All Sales"
        .Subject = "Sales"
        .SaveAs Filename:="Allsales.xlsx"
    End With
End Sub
1
2
3
4
5
6
7
8
9
10