VB 是常用的应用软件开发工具之一,由于VB 的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL 的强大报表功来实现报表功能。但由于VB 与EXCEL 由于分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们研究的课题。 一、 VB 读写 EXCEL 表: 能获取到表的行数的代码:xlSheet2.UsedRange.Rows.Count VB 本身提自动化功能可以读写 EXCEL 表,其方法如下: 1、在工程中引用Microsoft Excel 类型库: 从"工程"菜单中选择"引用"栏;选择 Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择"确定"。表示在工程中要引用EXCEL 类型库。 2、在通用对象的声明过程中定义 EXCEL 对象: Dim xlApp As Excel.Application Dim xlBook As Excel.WorkBook Dim xlSheet As Excel.Worksheet 3、在程序中操作EXCEL 表常用命令: Set xlApp = CreateObject("Excel.Application") '创建 EXCEL 对象 Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL 工件簿文件 xlApp.Visible = True '设置 EXCEL 对象可见(或不可见) Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表 xlSheet.Cells(row, col) =值 '给单元格(row,col)赋值 xlSheet.PrintOut '打印工作表 xlBook.Close (True) '关闭工作簿 xlApp.Quit '结束 EXCEL 对象 Set xlApp = Nothing '释放 xlApp 对象 xlBook.RunAutoMacros (xlAutoOpen) '运行 EXCEL 启动宏 xlBook.RunAutoMacros (xlAutoClose) '运行 EXCEL 关闭宏 4、在运用以上 VB 命令操作EXCEL 表时,除非设置 EXCEL 对象不可见,否则 VB 程序可继续执行其它操作,也能够关闭 EXCEL,同时也可对 EXCEL 进行操作。但在EXCEL操作过程中关闭 EXCEL 对象时,VB 程序无法知道,如果此时使用EXCEL 对象,则 VB 程序会产生自动化错误。形成 VB 程序无法完全控制 EXCEL 的状况,使得VB 与EXCEL 脱节。 二、 EXCEL 的宏功能: EXCEL 提供一个Visual Basic 编辑器,打开Visual Basic 编辑器,其中有一工程属性窗口,点击右键菜单的"插入模块",则增加一个"模块1",在此模块中可以运用Visual Basic 语言编写函数和过程并称之为宏。其中,EXCEL 有两个自动宏:一个是启动宏(Su...