用EXCEL对象读取EXCEL文件中数据.pdf

用EXCEL 对象读取EXCEL 文件中数据.然后通过ADODB 连接SQL 进和导入 下面是EXCEL 对象的详解 1 前言 做为一种简捷、系统的 Windows应用程序开发工具，VB 具有强大的数据处理功能，提供 了多种数据访问方法，可以方便地存取Microsoft SQL Server、Oracle、XBase 等多种数据库， 被广泛应用于建立各种信息管理系统。但是，VB 缺乏足够的、符合中文习惯的数据表格输 出功能，虽然使用CrystalReport 控件及 Crystal Reports程序可以输出报表，但操作起来比 较麻烦，中文处理能力也不理想。Excel在表格方面有着强大的功能，我们可以用VB 编写 直接控制Excel 操作的程序,方法是用VB 的OLE 自动化技术获取Excel 的控制句柄,从而直 接控制Excel 的一系列操作。本文结合自己的实践和体会，谈谈如何在VB6.0 应用程序中调 用Exce12000，供大家参考。 2Excel 对象模型 为了在VB 应用程序中调用Excel，必须要了解Excel对象模型。Excel 对象模型描述了Excel 的理论结构，所提供的对象很多，涉及VB 调用Excel 时最可能用到的对象有：（见Microsoft Excel对象的文章） 3 调用Excel 在VB 应用程序中调用Excel，实质是将Excel 作为一个外部对象来引用，由Excel 对象模型 提供能从VB 应用程序内部来程序化操纵的对象以及相关的属性、方法和事件。 3.1 在VB 工程中添加对Excel 类型库的引用 为了能从VB 应用程序中访问Excel 丰富的内部资源，使Excel 应用程序运行得更快，需要 在VB 工程中添加对Excel 类型库的引用。具体步骤如下： 1) 在VB 应用程序中调用Excel，你的计算机系统中必须安装Excel。从VB5“工程”菜单中 选择“引用”； 2) 在“引用”对话框中选择Excel 类型库：Microsoft Excel9.0Object Library； 3) 单击左边小方框，使之出现“√”符号； 4) 按“确定”退出。 3.2 引用Application 对象 Application 对象是Excel 对象模型的顶层，表示整个Excel 应用程序。在VB 应用程序中调 用Excel，就是使用Application 对象的属性、方法和事件。为此，首先要声明对象变量： DimVBExcelAsObject 或直接声明为Excel 对象： DimVBExcelAsExcel.Application 在声明对象变量之后，可用CreateObject 函数或GetObject 函数给变量赋值新的或已存在的 Application 对象引用。 1)用CreateObject 函数生成新的对象引用： SetVBExcel CreateObject (Excel.Application) 字符串“Excel.Application”是提供Excel 应用程序的编程ID，这个变量引用Excel 应用程序本 身。 2)用GetO场ect 函数打开已存在的对象引用： SetAppExcel GetObject(Temp.XLS) 上面语句打开文件Temp.XLS。 3)Application 对象常用的属性、方法 Visible属性取True或False，表明Excel 应用程序是否可见。 Left,Top 属性Excel 窗口的位置； Height,Width 属性Excel 窗口的大小； WindowState 属性指定窗口的状态； Quit 方法,退出Microsoft Excel； Calculate 方法,重新计算所有打开的工作簿、工作表或单元格。 Evaluate 方法,求值数学表达式并返回结果。 3.3 使用Excel 应用程序 下面分类给出其中常用的属性和方法。 1)使用工作薄 Workbook 对象代表Excel 应用程序中当前打开的一个工作簿，包含在Workbooks集合中。 可以通过Workbooks集合或表示当前活动工作簿的ActiveWorkbook 对象访问Workbook 对 象。 常用的方法有： Add方法:创建新的空白工作簿，并将其添加到集合中。 Open 方法:打开工作簿。 Activate 方法:激活工作簿，使指定工作簿变为活动工作簿，以便作为ActiveWorkbook 对象 使用。 Save 方法:按当前路径和名称保存现有工作簿(如是首次保存，则将其保存到缺省名称中，如 BOOK1.XLS)。 SaveAs方法:首次