- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
一、 Excel 对象模型
为了在VB应用程序中调用Excel,必须要了解Excel对象模型。Excel对象模型描述了Excel的理论结构,所提供的对象很多,其中最重要的对象,即涉及VB调用Excel最可能用到的对象有:
?
二、调用Excel
在VB应用程序中调用Excel,实质是将Excel作为一个外部对象来引用,由Excel对象模型提供能从VB应用程序内部来程序化操纵的对象以及相关的属性、方法和事件。
1、在VB工程中添加对Excel类型库的引用
为了能从VB应用程序中访问Excel丰富的内部资源,使Excel应用程序运行得更快,需要在VB工程中添加对Excel类型库的引用。具体步骤如下:
a)从VB5“工程”菜单中选择“引用”;
b) 在“引用”对话框中选择Excel类型库:Microsoft Excel9.0 Object Library;
c)单击左边小方框,使之出现“√”符号;
d)按“确定”退出。
注:要想在VB应用程序中调用Excel,你的计算机系统中必须安装Excel。
2、引用Application对象
Application对象是Excel对象模型的顶层,表示整个Excel应用程序。在VB应用程序中调用Excel,就是使用Application对象的属性、方法和事件。为此,首先要声明对象变量:
Dim VBExcel As Object
或直接声明为Excel对象:
Dim VBExcel As Excel.Application
在声明对象变量之后,可用CreateObject函数或GetObject函数给变量赋值新的或已存在的Application对象引用。
a)用CreateObject函数生成新的对象引用:
Set VBExcel=CreateObject (Excel.Application)
字符串“Excel.Application”是提供Excel应用程序的编程ID,这个变量引用Excel应用程序本身。
b)用GetO场ect函数打开已存在的对象引用:
Set AppExcel=GetObject(SAMP.XLS)
上面语句打开文件SAMP.XLS。
3、Application对象常用的属性、方法
属性、方法 方法
Visible属性 取True或False,表明Excel应用程序是否可见。
Left,Top属性 Excel窗口的位置;
Height, Width属性 Excel窗口的大小;
WindowState属性 指定窗口的状态,取:XIMaximized(最大化)X1 Minimized(最小化)x1 Normal(缺省)。
Quit方法 退出Microsoft Excel;
Calculate方法 重新计算所有打开的工作簿、工作表或单元格。
Evaluate方法 求值数学表达式并返回结果。
示例1:求值数学表达式:
Dim VBExcel As Object
Set VBExcel=CreateObject (Excel.Application)
X=VBExcel. Evaluate (3+5*(cos (1/log (99. 9)))) 三、使用Excel应用程序 如前所述,在VB应用程序中调用Excel应用程序,就是使用Application对象的属性、方法和事件。下面分类给出其中常用的属性和方法。
1、使用工作薄
Workbook对象代表Excel应用程序中当前打开的一个工作簿,包含在Workbooks集合中。可以通过Workbooks集合或表示当前活动工作簿的Active Workbook对象访问Workbook对象。
常用的方法有:
属性、方法 意义
Add方法 创建新的空白工作簿,并将其添加到集合中。
Open方法 打开工作簿。
Activate方法 激活工作簿,使指定工作簿变为活动工作簿,以便作为Active Workbook对象使用。
Save方法 按当前路径和名称保存现有工作簿(如是首次保存,则将其保存到缺省名称中,如BOOK1.XLS)。
SaveAs方法 首次保存工作簿或用另一名称保存工作簿。
Close方法 关闭工作簿。
PrintOut方法 打印工作簿,语法为:
PrintOut (from, To, Copies, Preview, Printer, To
文档评论(0)