Excel VBA 多行多列数据核对

今天要讲的例子涉及到多行多列的数据进行对比

问题如下:

解决的思路如下:

代码运行的结果如下:

代码如下:

代码解析

1:2~3行 dim定义变量;

2:4~5行 用两个数组arr,brr,分别读取两个表格的数据;

3:6行 定义已给新的数组crr,用于放结果;

4:9~25行 遍历数组,并进行对比

5:10~12行 数组类型的转换;

6:13、17行 分别连接好要求的13个数据;

7:15~16 计算数据,并按要求四舍五入;

8:19~15行 设定字典,并比较另一个数据是否再字典内,如不再字典内,说明两个数据也不相等(因为字典有去重的作用)

9:27~29行 设定结果数据的表头

10:31~35行 清空目标工作表的内容。并写入数组。

私信 视频 可以获取54集VBA入门视频

私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件