怎样使用vb编写程序把两个excel内容进行对比

来源:百度知道 编辑:UC知道 时间:2024/06/07 17:39:23
把两个表的内容比较后输出不一样的项。

这种问题很有深度,我看很难有人能回答,不过我也很想知道
回答者: 772636 - 见习魔法师 三级 11-17 21:53
VB调用excel可以使用excel自带的控件
工程,引用,找到Microsoft Excel 11.0 Obcect Libiary(11.0是office2003的,别的版本该数字不一样),选择,确定

然后调用

VB调用excel可以使用excel自带的控件
工程,引用,找到Microsoft Excel 11.0 Obcect Libiary(11.0是office2003的,别的版本该数字不一样),选择,确定

然后调用

Dim xls_app As New Excel.Application
Dim xls_book As New Excel.Workbook
Dim xls_sheet As New Excel.Worksheet

Set xls_app = CreateObject("Excel.Application")
Set xls_book = xls_app.Workbooks.Open(文件名)'文件名包含完整路径!
Set xls_sheet = xls_book.Worksheets(1)'后面的1是指excel的工作表,1为第一张,以此类推

获取单元格内容:xls_app.Range("A1") 即得到A1单元格的内容

简单的作字符串比较好了

这种问题很有深度,我看很难有人能回答,不过我也很想知道