上一章分享了Application的屬性WorksheetFunction的具體含義以及具體使用方法。今天給大家繼續分享Application的屬性中的Workbooks的使用和具體含義。

1. Application的常見的屬性有哪些？

① ActiveCell：當前活動單元格。

② ActiveChart：當前活動工作簿中的活動圖表。

④ ActiveWindow：當前活動視窗。

⑤ ActiveWorkbook：當前活動工作簿。

⑥ Charts：當前活動工作簿中所有的圖表工作表。

⑦ Selection：當前活動工作簿中所有選中的物件。

⑨ Worksheets：當前活動工作薄中的所有worksheet物件。

⑩ Workbooks：當前所有開啟的工作簿。

今天主要給大家分享Workbooks，其中Workbook表示一個工作簿。

1.怎麼建立一個工作簿？

建立工作簿需要使用到Workbooks物件的一個方法Add方法：

建立一個工作薄有二種方式：

1. Workbooks.Add

2. Workbooks.Add(template)

注意：一種不帶引數的就是第一種，一種帶引數的就是第二種，template主要是怎麼建立工作薄， xlWBATChart，xlWBATWorksheet，xlWBATExcel4MacroSheetxlWBATExcel4IntlMacroSheet表示的是建立圖表工作表宏表或者標準工作表。

程式碼1：

Sub g()

Workbooks.Add template:="E:\我要建立一個工作簿\建立工作薄舉例子\馬上開始建立\本檔案下有個模板\book2.xlsm"

End Sub

程式碼2：

Sub g()

Workbooks.Add "C:\Users\Administrator\Desktop\1111\book2.xlsm"

End Sub

注意：對比一下二個程式碼中有一個有template一個沒有，結果是一樣的。

2.開啟工作薄

開啟工作薄要使用到Workbooks的open方法：

程式碼3：

Sub g()

Workbooks.Open "C:\Users\Administrator\Desktop\1111\book2.xlsm"

End Sub

3.儲存工作薄

儲存分為2種：

1.儲存程式碼所在的工作薄。

ThisWorkbook.Save 直接儲存。

2.另存工作薄

程式碼4：

Sub g()

ThisWorkbook.SaveAs "C:\Users\Administrator\Desktop\1111\1.xls"

End Sub

執行結果：

4.關閉工作薄

1.關閉所有工作薄

Workbooks.Close

2.關閉指定工作薄

程式碼5：

Sub g()

Workbooks("1.xls").Close

End Sub