Workbook工作簿对象基础

大家好，前面已经介绍了常用的range单元格对象和worksheet普通工作表对象，本节开始介绍工作簿workbook对象，首先通过下图回顾一下常用对象的层级关系。

下面开始介绍workbook工作簿对象的基础知识。

一、工作簿对象的引用

一个工作簿对象workbook实际就是一个excel文件，在vba代码使用时引用它主要有两种方式，一种是通过工作簿对象名称，一种是是通过index索引号。

1、Workbooks（“工作簿完整名称”）

工作簿对象workbook对象的名称，即excel文件的名称都是不重复的，引用时需要工作簿的完整名称，包括文件后缀名（要注意后缀的不同，带有宏的excel文件为xlsm后缀，普通表为xlsx后缀。）下面通过实例简单介绍。

Workbooks("vba.xlsm").Worksheets.Count表示统计vba.xlsm工作簿对象的普通工作表的数量，在引用工作簿对象时，表示方法为：Workbooks("vba.xlsm")。注意参数是完整的excel文件名，包括后缀。

2、Workbooks(index索引号）

在工作簿对象引用时，index索引号是工作簿的在任务栏的从左至右的顺序（也是工作簿依次打开的顺序。）

电脑打开了三个工作簿，从左至右分别是vba，工作簿1，示例表。通过循环来获得三个工作表的名称。

Sub test()

Dim i As String, j As Integer

For j = 1 To Workbooks.Count

i = Workbooks(j).Name

Debug.Print i

Next

End Sub

代码中通过workbooks工作表集合的count属性，获得工作簿对象的数量。（集合的count属性前面已经涉及。）

然后在for循环中循环索引号的数值，workboks(index索引号).name表示不同工作簿的名称。循环中在立即窗口显示工作簿的name名称。（顺序与工作簿打开的顺序一致。）

（注意三个表的后缀是不同的，所以前面说的使用名称引用工作簿时候，需要注意工作簿类型的后缀。）

二、workbooks集合

前面已经介绍过worksheets普通工作表集合，workbooks工作簿集合也类似。workbooks工作簿集合最常见的属性count属性，用于统计集合中对象的数量。用法上面的第二个示例都已经用到。

循环中workbooks.count的数值为3，for循环从1指3。

三、Activeworkbook

Activeworkbook是指当前活动的工作簿。

在使用excel时，都是在某个工作簿workbook中进行编辑。即该工作簿当前是被激活的状态，使用activeworkbook来表示。

在workbook工作簿对象层级上为application主程序对象，在代码中可以选择性省略。下面举例说明，获得当前活动的工作簿的名称，和工作簿中活动工作表的名称。

Sub test()

Dim i As String, sht1 As Worksheet

i = ActiveWorkbook.Name

Set sht1 = ActiveWorkbook.ActiveSheet

Debug.Print i, sht1.Name

End Sub

定义了变量i为字符串变量，sht1为工作表对象。

将当前工作簿ActiveWorkbook的名称name属性赋值给变量i。

通过set语句将当前活动工作簿的活动工作表赋值给sht1，Set sht1 = ActiveWorkbook.ActiveSheet （复习下对象变量的赋值）

最后在立即窗口㕜显示当前工作簿的名称以及当前活动工作簿的活动工作表的名称。

四、Thisworkbook

Thisworkbook表示当前代码所在的工作簿，需要注意的是它是只读的对象，不可以修改赋值。

定义变量i为字符串变量后，将thisworkbook对象，即代码所在工作簿的name名称赋值给变量i，最后在立即窗口中显示。当前代码所在的工作簿的名称为vba.xlsm。

今天下雨

本节主要介绍了工作簿对象的引用方法。内容之前已经有很多相似之处，后续会介绍工作簿对象常用的属性和方法。祝大家学习快乐。