2024年5月9日发(作者:)

VB操作Excel

在工程中引用Microsoft Excel类型库从"工程"菜单中选择"引用"栏;选择Microsoft Excel

Object Library(EXCEL2000),然’后选择"确定"。

‘打开Excel文件

Dim xlApp As '定义EXCEL类

Dim xlBook As '定义工件簿类

Dim xlsheet As '定义工作表类

Set xlApp = CreateObject("") '创建EXCEL应用类

Set xlBook = + "银行导出表.xls") '打开EXCEL工作簿

Set xlsheet = (1) '打开EXCEL工作表

'激活工作表

‘对EXCEL的各项操作

‘获得数据的行数

‘在第一列前增加一行

(1).Insert

‘关闭Excel文件

(True) '关闭EXCEL工作簿

'关闭EXCEL

Set xlApp = Nothing '释放EXCEL对象

VB中操作Excel的一般做法(读取)

1、定义Excel操作变量

Dim objExcelFile As

Dim objWorkBook As

Dim objImportSheet As

2、打开Excel进程,并打开目标Excel文件

Set objExcelFile = New

= False

Set objWorkBook = objImportSheet = (1)