今天再说一个跨工作表提出数据的案例

问题如下：

解决的思路如下：

利用字典，就可以查字典来获取向对应的数据。

代码运行的结果如下：

代码如下:

有效性设置代码：

数据查询代码：

代码解析

上回说到，虽然指针的运用让我们的数组排序在性能上有了大大的提高，但是CopyMemory始终是我们心里一个挥之不去的阴影，因为它还是太慢。在C里我们用指针，从来都是来去自如，随心所欲，四两拨千斤；而在VB里，我们用指针却要瞻前顾后，哪怕一个字节都要用到CopyMemory乾坤大挪移，真累。今天我们就来看看，能不能让VB里的指针也能指哪儿打哪儿，学学VB指针的凌波微步。

接着上期内容继续分享vba实操

单元格/单元格区域的操作

ActiveCell.CurrentRegion.Select

或Range(ActiveCell.End(xlUp),ActiveCell.End(xlDown)).Select

''选择当前活动单元格所包含的范围，上下左右无空行

大家好，我们今日继续讲解VBA数组与字典解决方案第22讲：在VBA中如何使用动态数组，以及利用动态数组去除重复值的方法。如果文本中含有大量的重复值，此时，如果我们要剔除重复值，该怎么办？用VBA的方法该如何做到呢？我在这讲和下一讲中将解答这个问题，并提供给读者一个可以测试的实例。今日先讲这个内容要用到的知识点。

字典，是由两个一维数组构成的。keys方法将字典里所有的key转换成一个一维数组，items方法将所有的item转换为一个一维数组。

1、将字典数据输出到工作表

字典的keys方法和items方法都会返回一个一维数组，其中，keys方法返回的是一个没有重复值的一维数组。