Excel VBA 多条件查询-字典嵌套

今天遇到的问题如下：

解决的思路如下：

运行的结果如下：

代码如下：

代码解析：

1：dim 语句定义变量

2：set 语句设定字典

3：设定key2的值

4：遍历第一列的值，放入字典。并把第一列的值，重新设置为字典。然后把上述key2的值，放入新的字典。类似建立思路里面的表二

5：把问题的表一放入数组。

6：通过已知的的条件，查询字典。把结果写入数组

7：把数组写入原表格。

点击关注，可以阅读更多与VBA 相关的文章

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