在VB应用程序中调用Excel2000

Visual Basic简称(VB)是设计Windows应用程序强有力的开发工具，“全球绝大多数Windows应用程序都是用VB开发的”； Excel是目前使用最广泛的办公应用软件之一，它具有强大的数学分析与计算功能，包括很多VB没有的求值数学表达式的函数和方法。由于Excel的应用程序对象是外部可创建的对象，所以能从VB应用程序内部来程序化操纵Excel。本文结合自己的实践和体会，谈谈如何在VB6.0应用程序中调用Exce12000，供大家参考。


　　一、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)))")