用VB操作Excel（VB6.0）（整理）.doc
5星 · 超过95%的资源 142 浏览量
2022-11-30
19:12:02
上传
评论 5
收藏 591KB DOC 举报 
用 VB 操作 Excel(VB6.0)(整理)、
一、 VB 读写 EXCEL 表：
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 有两个自动
宏：一个是启动宏（Sub Auto_Open()）
，另一个是关闭宏（Sub Auto_Close()）。它们的特性是：当用 EXCEL 打含有启动宏的工簿时，就会自动
剩余41页未读，继续阅读
评论5
最新资源