《VBA编程及应用基础》第5章Excel的VBA对象2WorkbookWorksheet对象.pptx

Excel 的VBA对象Workbook 和 WorksheetWorkbooks对象( P.109 )Workbooks 对象用于返回 Excel 应用程序中当前打开的所有 Workbook 对象的集合Workbooks 对象的常用属性：Item：集合中的项目（即工作簿），以数组形式存放 Set wb = Workbooks.Item(1)在实际应用时，也可以不显式引用 Item 属性而返回某个工作簿对象，如上式可以写成： Set wb = Workbooks(1)Count? ：集合包含的工作簿个数 MsgBox Application.Workbooks.CountWorkbooks对象Workbooks 对象的常用方法：Add? ：新建工作簿 Workbooks.AddClose? ：关闭所有的工作簿 Workbooks.CloseOpen? ：打开一个工作簿文档 Workbooks.Open C:\Path\Workbook.xlsWorkbooks对象示例：判断某个工作簿是否已经打开Sub IsBookOpen() Dim i As Integer For i = 1 To Workbooks.Count If Workbooks(i).Name = MyBook.xlsx Then MsgBox MyBook工作簿文件已经打开！ Exit Sub End If Next i MsgBox MyBook工作簿文件未打开！End SubWorkbook对象( P.110 )Workbook 对象代表 Microsoft Excel 工作簿Workbook 对象是 Workbooks 集合的成员Workbooks 集合包含 Excel 中所有当前打开的 Workbook 对象Workbook对象的常用属性Name?工作簿的名称FullName工作簿的完整文件标识符，包含路径和名称Path工作簿的存放路径如果某个工作簿从未保存过，则其 Path 属性返回一个空字符串 ()Workbook对象的常用属性Saved?如果工作簿从上次保存至今未发生过更改，则该属性值为 True，例：If ActiveWorkbook.Saved = False Then MsgBox 工作簿包含未保存的更改End If 如果要关闭某个有更改的工作簿，但又不想保存它或者不想出现保存提示，则可将此属性设为TrueWorkbook对象的常用属性ActiveSheet代表工作簿中活动的工作表Worksheets代表工作簿中所有普通工作表的集合Charts代表工作簿中所有图表工作表的集合Sheets代表所有工作表的集合，包括Worksheet对象和Chart对象Workbook对象的常用方法Activate：激活一个工作簿 Workbooks(1).ActivateClose? ：关闭一个指定的工作簿，并且（可选）指定是否保存修改 Workbooks(1).Close SaveChanges:=FalseSave：保存工作簿，如果还未保存过工作簿，则应该调用 SaveAs 方法 Workbooks(1). SaveAs Filename:=fNameWorksheets对象( P.113 )Worksheets 对象用于返回指定工作簿中所有 Worksheet 对象的集合Worksheet 对象也是 Sheets 集合的成员。Sheets 集合包含工作簿中所有的工作表（图表工作表和工作表）Worksheets对象的常用属性Item：集合中的项目（即工作表），以数组形式存放 Set ws = ActiveWorkbook.Worksheets.Item(1)因为 Item 是集合的默认成员 ，所以上式等价于： Set ws = ActiveWorkbook.Worksheets(1) Count? ：集合包含的工作表个数 MsgBox ActiveWorkbook.Worksheets.CountWorksheets对象的常用方法Add? ：新建工作表，并将新建的工作表置为活动工作表，语法： 表达式.Add(Before, After, Count, Type)Before：指定某工作表，新建工作表将在此工作表之前After：指定某工作表，新建工作表将在此工作表之后 Count：要添加的工作表数，默认值为 1 Type：新建工作表的类型，默认值为 xlWorksheet说明：Before 和 After 只能二选一，如果同时省略 Before 和 After，则新工作表插入到活动工作表之前实践1在 实例/eg1.xlsxeg1.xlsx 的 Sheet1 中，单击“按钮1”时，在第一张工作表之后插入一个新工作表；单击“按钮2”时，在 Sheet1 的 B