今天要讲的例子，主要跨工作簿的查询实例。

问题如下：

解决的思路如下：

代码运行的结果如下：

代码如下:

代码解析

1：2~3行 DIM定义变量；

2：4、5、21、22行 关闭、打开警告及屏幕刷新；

3：6行 后期绑定字典；

4：7行 后去当前工作簿的路径；

5：8行 需要打开工作簿的名称；

6：9~12行 打开记录补偿金的工作簿，并把数据赋值给数组arr，然后不保存关闭工作簿；

7：13~15行 遍历数组arr，先判断编号是否为空，然后把对应的key及item装入字典；

8：16行 把基本工资工作簿里面的数组放入数组brr；

9：17~19行 遍历数组brr，然后把值赋值给U列；

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

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