首页 > 代码库 > Workbooks对象集

Workbooks对象集

Workbooks对象集

VBA电子文档位置:https://msdn.microsoft.com/zh-cn/library/ff835568.aspx

参考网址:http://www.360doc.com/userhome/7835172#

(馆主:fzchenwl)

   当前所有打开的工作簿对象的集合

<</span>一>如何引用工作簿

1、使用open方法引用

比如:

技术分享

我在新建的一个工作簿中引用文件工作簿1.xlsm(俩文件名字一样,后缀名不一样),这里使用新定义的we代表工作簿1.xlsm,然后通过we引用期内容

2、通过新建

Dim wb As Workbook

Set wb = Workbooks.Add

这里就直接新建一个空白的工作簿。

<</span>二>方法

1、Add方法,向工作簿对象集中一个新的工作簿,相当于“文件->新建”命令。格式如下:

          Workbooks.Add  (不带参数,建立一个空白工作簿)

或者一个带有一图表的工作簿:

workbooks.Add xlWBATChart

(Add后即为参数,注意大小写)

结果为:

技术分享图上内容为活动工作簿里的数据

2、Open方法,打开一个指定的工作簿。格式参上(路径及工作簿名)。

还可以这样:

workbooks.Openfilename:="C:\Users\RHP\Desktop\工作簿1.xlsx"

注意filename后面是“:=”。

或者不要参数,直接workbooks.Open "C:\Users\RHP\Desktop\工作簿1.xlsx"

3、Close方法,关闭一个工作簿文件

 

Workbook对象

代表一个独立的工作簿文件

<</span>一>属性

1、ActiveSheet属性,返回当前工作簿中的活动工作表对象

2、Author属性,返回或设定工作簿的作者姓名,由此确定工作簿的所有者

3、Saved属性,用于瓢工作簿文件是否做过修改。

4、Name属性:返回活动工作簿的名称

5、Path属性:返回活动工作簿的路径

6、FullName属性:返回带名称的完整路径

 

<</span>二>方法

1、Activate方法,用于霜一个工作簿为当前活动工作簿,如,Workbooks("myOffice.xls").Activate

2、Close方法,用于关闭指定的工作簿

Eg:Workbook.Close

指定工作簿:

Eg:Workbook(“Book1”).Close

加上参数:

Workbook(“Book1”).Closesavechanges=”True”(可简写为True)

3、Save方法,用于保存指定的工作簿一般为:

Thisworkbook.Save

如果想要另存,或者是第一次保存一个新建的工作簿,则为:

ThisworkbookSaveAs Filename:=”带文件名的完整路径”

SaveAs会保存文件后,关闭源文件,打开新文件。如果想要另存同时保留源文件,则使用:SaveCopyAs

 

ThisWorkbook和ActiveWorkbook的区别

ThisWorkbook是对程序所在工作簿的引用;

ActiveWorkbook是对活动工作簿的引用;

Eg:

Msgbox “代码所在工作簿为” & ThisWorkbook.Name

Msgbox “当前活动工作簿为” & ActiveWorkbook.Name

Workbooks对象集