资源描述：
《EXCEL-Workbook对象应用大全.docx》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、Workbook对象应用大全Workbook对象代表一个工作簿，Workbooks集合对象则代表同一Excel进程中打开的所有工作簿对象。[应用1]创建新工作簿（Add方法）使用Add方法在Workbooks集合中创建新工作簿，所创建的工作簿为活动工作簿。其语法为：Workbooks.Add(Template)参数Template可选，决定如何创建新工作簿。如果将该参数设置为已存在的Excel模板文件名称，那么将以该文件作为模板创建工作簿。该参数可以为下列XlWBATemplate常量之一：xlWBATChart（值-4109，代表图表）、xlWBATExcel4IntlMacroShee
2、t（值4）、xlWBATExcel4MacroSheet（值3）、xlWBATWorksheet（值-4167，代表工作表）。在创建新工作簿时，如果指定该参数，那么将创建包含指定类型工作表的工作簿；如果省略该参数，那么将创建包含一定数量空工作表的工作簿，工作表数为SheetsInNewWorkbook属性所设置的数量。应用示例1：创建一个新工作簿SubCreateNewWorkbook1()MsgBox"将创建一个新工作簿."Workbooks.AddEndSub应用示例2：创建一个新工作簿并命名工作表且添加数据SubCreateNewWorkbook2()DimwbAsWorkbookD
3、imwsAsWorksheetDimiAsLongMsgBox"将创建一个新工作簿,并预设工作表格式."Setwb=Workbooks.AddSetws=wb.Sheets(1)ws.Name="产品汇总表"ws.Cells(1,1)="序号"ws.Cells(1,2)="产品名称"ws.Cells(1,3)="产品数量"Fori=2To10ws.Cells(i,1)=i-1NextiEndSub应用示例3：创建带有指定数量工作表的工作簿SubtestNewWorkbook()MsgBox"创建一个带有10个工作表的新工作簿"DimwbAsWorkbookSetwb=NewWorkbook
4、(10)EndSub FunctionNewWorkbook(wsCountAsInteger)AsWorkbook'创建带有由变量wsCount提定数量工作表的工作簿，工作表数在1至255之间DimOriginalWorksheetCountAsLongSetNewWorkbook=NothingIfwsCount<1OrwsCount>255ThenExitFunctionOriginalWorksheetCount=Application.SheetsInNewWorkbookApplication.SheetsInNewWorkbook=wsCountSetNewWorkbook=
5、Workbooks.AddApplication.SheetsInNewWorkbook=OriginalWorksheetCountEndFunction自定义函数NewWorkbook可以创建最多带有255个工作表的工作簿。本测试示例创建一个带有10个工作表的新工作簿。[应用2]打开工作簿（Open方法）Open方法用于打开一个现有的工作簿，其语法为：Workbooks.Open(FileName,UpdateLinks,ReadOnly,Format,Password,WriteResPassword,IgnoreReadOnlyRecommended,Origin,Delimite
6、r,Editable,Notify,Converter,AddToMru,Local,CorruptLoad)可以看到，该方法具有很多参数，但大多数参数都很少用到。在这些参数中，除参数FileName必须外，其它参数都可选。参数FileName指定要打开的工作簿文件的名称，参数UpdateLinks指定更新工作簿中链接的方式，参数ReadOnly用来设置是否以只读方式打开工作簿。如果需要使用密码来打开工作簿，则应该将参数Password设置为该密码；如果需要使用密码打开工作簿但没有指定密码，则会弹出询问密码的对话框。参数AddToMru指定是否将工作簿添加到最近使用的文件列表中，建议将其设
7、置为True，默认值为False。应用示例4：以只读方式打开某工作簿SubopenWorkbook2()DimfnameAsStringMsgBox"将D盘中的<测试.xls>工作簿以只读方式打开"fname="D:测试.xls"Workbooks.OpenFilename:=fname,ReadOnly:=TrueEndSub[应用3]访问特定的工作簿使用Item属性返回Workbooks集合中特定的工作簿。例如：W
