Workbook工作簿对象方法（一）

大家好，前面介绍了工作簿对象的属性，本节开始介绍工作簿对象的常用方法。这些常用方法可以实现平时用手工的新建、打开、激活、保存excel表等功能。

一、工作簿对象add方法

创建新的工作簿是通过workbooks集合对象的add方法，新建的工作簿为当前活动工作簿。

代码为workbook.add [Template]

1、参数可省略，add方法不加参数时，excel创建新的空工作簿，自动将工作簿命名为“BookN”，其中N为顺次的数字，（可以通过application对象的SheetInNewWorkbook属性来调整新建工作簿中工作表的数量。）

2、参数的字符串如果指定的是已有的excel文件，那么新建文件会以该excel文件为模板创建新工作簿。新工作簿名在模板工作簿名的后面加有规律的数字。

3、如果参数是指定的常量，则可以用来创建指定格式的excel文件。常量名称值对应格式如下表，了解下即可，平时通常使用工作表常量。

不过通常创建新工作簿是分配一个对象变量的方式来创建，这样更容易对新工作簿进行设置。下面我们通过示例来演示。

Sub test()

Dim i As Integer

Dim wb1 As Workbook

i = Workbooks.Count

Set wb1 = Workbooks.Add

With wb1

.SaveAs Filename:="VBA示例文件" & i & ".xlsx"

End With

End Sub

首先定义了整型变量i和工作簿对象wb1。

代码中统计了打开了的workbook对象的数量，并将workbooks.count赋值给变量i。（可以用于区别新建的文件的名称）

将workbooks.add方法生成的新工作簿赋值给了对象变量wb1，将wb1的文件名更改为VBA示例文件" & i & ".xlsx。（此处用了with语句，可以方便增加其他属性的更改。）

二、工作簿对象open方法

在使用EXCLE文件时，在VBA代码中打开工作簿是通过workbooks集合的open方法。open方法实际有14个参数，但常用的较少，先介绍常见的open方法，即只加必须参数filename参数，参数filename为excel文件的完整路径。语法结构如下：

workbooks.open(filename)

常用方法很简单下面通过示例来演示，打开我的电脑D盘根目录下的"vba示例.xlsm"文件 。

Sub test()

Workbooks.Open Filename:="D:\VBA示例.xlsm"

End Sub

代码中filename参数后用 := ，加excel完整路径，路径需要用英文引号。（filename:=可以省略）

通常代码中会讲打开的excel文件赋值给对象变量，路径字符串也可以用变量代替，这样方便修改。

Sub test()

Dim wb1 As Workbook, fn1 As String

fn1 = "D:\VBA示例.xlsm"

Set wb1 = Workbooks.Open(fn1)

End Sub

代码中，首先定义wb1为工作簿变量，fn1为字符串变量。

将 Workbooks.Open(fn1)返回的工作簿对象赋值给wb1变量。（此处省略了fiename:= ，同时用变量fn1代理文件路径。）

这样方便直接更改路径参数fn1变量，同时打开的工作簿文件可以方便通过wb1变量来修改属性等。

打开的工作簿文件赋值给变量，也可以检测指定工作簿是否打开。

Sub test()

Dim wb1 As Workbook, fn1 As String

fn1 = "D:\VBA示例.xlsm"

Set wb1 = Workbooks.Open(fn1)

If Not wb1 Is Nothing Then

MsgBox "指定Excel文件已打开"

Else

MsgBox "指定Excel文件未打开"

End If

End Sub

在代码中通过IF判断结构，判断not wb1变量是否被赋值，即If Not wb1 Is Nothing Then，

如果被赋值，则弹窗文件打开，否则文件未打开。

介绍完最常用的使用方式后，下面说下open方法的完整语法结构。

Workbooks对象.Open(FileName,[UpdateLinks],[ReadOnly],[Format],[Password],[WriteResPassword],[IgnoreReadOnlyRecommended],[Origin],[Delimiter],[Editable],[Notify],[Converter],[AddToMru],[Local],[CorruptLoad])

参数说明，介绍其中常用到的。

1、参数FileName必需，指定一个字符串，代表要打开的工作簿文件名。

2、参数UpdateLinks可选，指定文件中外部引用（链接）的方式。如果忽略该参数，那么将提示用户指定如何更新链接。指定值为0将不更新外部引用（链接），指定值为1将更新外部引用（链接）但不更新远程引用（链接），指定值为2将更新远程引用（链接）但不更新外部引用（链接），指定值为3将更新外部引用（链接）。

3、参数ReadOnly可选，如果设置其值为True，将在只读模式下打开工作簿。

4、参数Password可选，指定打开受保护工作簿时需要的密码。如果忽略该参数但是工作簿受密码保护，则会提示用户输入密码。

其他如果需要用到可以参考excel帮助文件。

本节主要介绍工作簿对象的常用方法add和open方法，后续会继续介绍其他方法。祝大家学习快乐。