vb操作excel经典.docVIP

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）用GetObject函数打开已存在的对象引用： 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方法 打印工作簿，语法为： Pri