VBA基础之Excel 工作薄(Book)的操作(三)

三、 Excel 工作薄(Book)的操作
1. Excel 创建工作薄(Book)

Sub addWorkbook()
    Workbooks.Add
End Sub

2. Excel 打开工作薄(Book)

方法名	参数	参数值	说明
Open	Filename	文件名	要打开的工作薄文件名
	Password	密码	文件密码（打开加密文件时使用）
	WriteResPassword	密码	指定文件的修改密码
	ReadOnly	只读模式	指定是否以只读模式打开文件，默认为FALSE

'打开文件
Sub openExcelWorkbook()
    Workbooks.Open Filename:="C:\excelvba\excel_test.xlsx"
End Sub

'打开加密文件
Sub openExcelWorkbookWithPassword()
    Workbooks.Open Filename:="C:\excelvba\excel_test.xlsx", Password:="password"
End Sub

'指定文件的修改密码，打开文件
Sub openExcelWorkbookWithWritePassword()
    Workbooks.Open Filename:="C:\excelvba\excel_test.xlsx", WriteResPassword:="password"
End Sub

'以只读模式打开加密文件
Sub openExcelWorkbookWithWritePassword()
    Workbooks.Open Filename:="C:\excelvba\excel_test.xlsx", Passwor:="password", ReadOnly:=True
End Sub

3. Excel 关闭工作薄(Book)

方法名	参数	参数值	说明
Close	SaveChanges	是否保存	指定是否保存对文件的修改。 1. True: 选择保存新建文件的时候需要用Filename参数指定要保存的文件名称。 不指定文件的保存名称的话会弹出一个对话框 2. False: 放弃修改，不保存文件。 3. 省略: 会弹出一个对话框。
	Filename	保存的文件名	指定要保存的文件名

'放弃对文件Book1的修改，关闭文件Book1
Sub closeExcelbook()
    Workbooks("Book1").Close savechanges:=False
End Sub

'保存对Book1.xlsx文件修改并关闭文件
Sub closeExcelbook()
    Workbooks("Book1.xlsx").Close SaveChanges:=True
End Sub

'把对Book1.xlsx文件另保存到文件"Excel文件.xlsx"里
Sub closeExcelbook()
    Workbooks("Book1.xlsx").Close SaveChanges:=True, Filename:="Excel文件"
End Sub

'放弃对Book1.xlsx的修改并退出Excel程序
Sub closeExcelbook()
    Application.Quit
    Windows("Book1.xlsx").Close saveChanges:=False
End Sub

4. Excel 工作薄(Book)的保存

四、 Excel VBA编程基础
1. 变量
2. 数据类型
3. 表达式和计算
4. 函数
5. 数组
五、 Excel VBA程序的控制
1. If Else判断语句
2. Select Case
3. For Next
4. Do Loop
5. With End With
6. Exit
7. On Error
六 Excel VBA常用函数和方法
1. 搜索(Find)
2. 最终行、最终列
3. 置换(Replace)
4. 自动过滤(AutoFilter)
七、 Excel VBA的程序调试
1. VBA 立即窗口