很多同学在学习VBA的过程中对数组、字典都是很头疼的，尤其是循环语句，根据我学习的经验，特意将所有关于数组、字典进行封装，以后在使用的过程中，不需要在学循环语句或者定义字典，都能完成数据的处理。当中有很多函数是引用第三方库，引用第三方库的目的是为了加快代码的运行速度，传统VBA代码在处理打开工作簿读取数据的时候是比较慢的。

只要是安装了WpsComHelper的框架，将代码直接复制到VBA中就可以直接使用。以下将框架所有代码进行注释说明，方便给位同学学习及使用，在使用的过程中有什么好点建议或者问题也可以联系我进行加以完善改进。

字典经典案例

在下的代码中所使用的数据源表如下：

1.定义实例化对象

Public ws As New WpsComHelper.vbacom

2.写入以下代码

代码说明：根据数据源，按照第3列<地区>与第6列<年>对整个数据进行去重

Sub ComTest()
    Range("k1").Resize(1000, 100).Clear'清空单元格数据
    arr = Range("A1").CurrentRegion'将数据源装入数组
    brr = ws.DistinctBy(arr, "f3,f6")'使用字典去重函数对数据源进行去重，以第3列、第6列为关键字
    ws.ToRange brr, [k1]'将结果数组输出到[k1]单元格
End Sub

3.最终效果

代码说明：根据数据源，单列数据去重，按照第3列进行数据去重

Sub DistinctTest()
    Range("k1").Resize(1000, 100).Clear
    arr = Range("A1").CurrentRegion
    brr = ws.Distinct(arr, 3)
    ws.ToRange brr, [k1]
End Sub

最终结果