VBA简单实现两个Excel文件的比较方法
到财务走了一圈,正好看到一位同事正在对两个Excel文件进行比较。两个文件的内容大致如此(列出部分列名):
主贷身份证 | 主贷人 | 贷款余额 |
440602**** | 李*瑜 | ¥35,000 |
360102**** | 李*亮 | ¥81,359 |
440202**** | 李*英 | ¥48,125 |
440682**** | 白*娟 | ¥1117,50 |
财务同事的需求是:找出两个表中贷款人身份证一样,但贷款余额不一致的数据。因量比较大,手工去找余额不一致相当麻烦。对财务人员来说可能经常会碰到这样的问题,痛苦!我第一反应是要给她想个办法,简单处理这种繁琐的工作。于时随手写了以下VBA来实现。
第一步,先将要核对的两个文件放到一个文件中,一个放在Sheet1,另一个放在Sheet2中。
第二步,加个按钮,写以下VBA事件:
Private Sub CommandButton1_Click()
Dim objCon, objDataSet, sqlStr
Set objCon = CreateObject("ADODB.Connection")
Set objDataSet = CreateObject("adodb.recordset")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties='Excel 8.0;imex=1;';Data Source=" & ThisWorkbook.FullName
sqlStr = "select a.* from [Sheet1$] a left join [Sheet2$] b on (a.[主贷身份证]=b.[主贷身份证]) where a.[贷款余额]<>b.[贷款余额]"
Set objDataSet = objCon.Execute(sqlStr)
Sheet1.[e1:g1000].ClearContents '清除这个区域
Sheet1.[e1].CopyFromRecordset objDataSet '将不致的写到E列
objDataSet.Close
objCon.Close
Set objDataSet = Nothing
Set objCon = Nothing
End Sub
按下按钮,不一致的数据全部找了出来。需求和解决办法虽简单,但可以帮助到很多不懂VBA的朋友,供参考。
VBA简单实现两个Excel文件的比较方法相关推荐
- python将两个excel匹配_Python3实现两个Excel文件内容比对
#-*- coding: utf-8 -*- #比对两个Excel文件内容的差异 #---------------------假设条件---------------- #1.源表和目标表格式一致 #2 ...
- 使用Python解决对比出两个Excel文件中的不同项并将结果重新写入一个新的Excel文件
使用Python解决对比出两个Excel文件中的不同项并将结果重新写入一个新的Excel文件 因为有统计成员到会情况的任务,每次汇总时都很麻烦,需要一个个对应腾讯会议导出名单的成员,然后在总表上进行标 ...
- makefile 学习记录(一)简单的两个C文件编译
实现一个简单的两个c文件的编译 # makefile文件 方法一 CC = gcc #编译器的型号.PHONY: all #伪所址 不管有没有all 都会执行 all: hello.c tool.o ...
- 两个EXCEL文件的比较
要对两个EXCEL文件中的数据进行比较,可以用EXCEL的高级筛选功能,也可以通过借助ACCESS进行比较, 相比之下,借助ACCESS,比较两个EXCEL文件,更灵活,更容易. 1.在ACCESS中 ...
- php原生读取excel文件夹,原生php实现excel文件读写的方法分析php技巧
这篇文章主要介绍了原生php实现excel文件读写的方法,结合实例形式分析了采用原生php针对Excel进行读写操作的相关实现方法与操作注意事项,需要的朋友可以参考下 本文实例分析了原生php实现ex ...
- PHP(10):PHP读取Excel文件的记录-方法2
<PHP(3):PHP读取Excel文件的记录-方法1>中有在PHP中读取Excel的例子,有些麻烦,因为必须要加载很多的文件. 应该有ODBC的读取方法,还没有试,今天的方法简单了很多, ...
- php 原生 excel,关于原生php实现excel文件读写的方法
这篇文章主要介绍了原生php实现excel文件读写的方法,结合实例形式分析了采用原生php针对Excel进行读写操作的相关实现方法与操作注意事项,需要的朋友可以参考下 本文实例分析了原生php实现ex ...
- php 字符串不相等判断,php简单判断两个字符串是否相等的方法
php简单判断两个字符串是否相等的方法 本文实例讲述了php简单判断两个字符串是否相等的方法.分享给大家供大家参考.具体实现方法如下: function strcomp($str1,$str2){ i ...
- python求1到n的乘积_Python简单实现两个任意字符串乘积的方法示例
本文实例讲述了Python简单实现两个任意字符串乘积的方法.分享给大家供大家参考,具体如下: 题目: 给定两个任意数字组成的字符串,求乘积,字符可能很大,但是python具有无限精度的整数在这里就不需 ...
最新文章
- SubSonic数据库操作
- 银行招聘网计算机类笔试,中国人民银行计算机类笔试模拟题
- 【 CodeForces - 799A 】Carrot Cakes(模拟,细节,有坑)
- 如何确定VS编译器版本--_MSC_VER || #if _MSC_VER 1000 #pragma once #endif
- linux cached释放_正点原子Linux第四十一章嵌入式Linux LED驱动开发实验
- 机器学习——异常值检测
- Delphi版本下载合集更新至10.4.1
- Veritas Backup Exec 21.4 Multilingual (Windows) 下载
- Vs2019 打包项目程序和安装卸载程序
- JAVA数据库访问控制框架设计与使用
- 03_Unity小窍门100条(下)
- 求 一个 quality center explorer 9.0的 百度网盘 或是别的下载地址的链接
- python_docx读取word的内容
- The Oracle
- 干货|什么是字节码?字节码扩展名是什么?
- Python一些可能用的到的函数系列37flipflop 对象
- 高效mongoDB开发规范
- 【附源码】计算机毕业设计SSM时事新闻管理系统
- Linux之基础命令
- mysql match against_mysql全文模糊搜索MATCH AGAINST方法
热门文章
- 【目标检测】YOLOV8实战入门(七)模型基准测试
- matting笔记_一周小结
- Facebook推广攻略,让你轻松触达全球35.8亿真实用户!
- HRMS(人力资源管理系统)-从单机应用到SaaS应用-架构分析(功能性、非功能性、关键约束)-上篇...
- origin 纵坐标改为%显示
- android 在音乐播放器中设置一首歌曲为来电铃声,设置不起作用
- grunt uglify
- 哈?!你有对象还被人叫单身狗?
- html5游戏制作人物原图,HTML5 canvas粒子生成人物面部轮廓插件
- Deep Compressive Offloading: Speeding Up Neural Network Inference by Trading Edge Computation for ..