利用access创建数据字典_VBA字典第62讲：利用字典和数组函数，实现提取只出现一次的数据...

大家好，今日我们继续讲解VBA数组与字典解决方案，今日讲解第62讲内容：利用字典和数组函数，同样实现提取只出现一次数据.

在VBA解决方案中，字典和数组利用非常广泛，利用方法也非常之多，多看看可以打开自己的思路，从中寻找适合于自己的方案，根据自己的爱好可以多加利用，每一种方法，只用切实的利用了，弄透了才能变成自己的知识结构。

今日内容同样是讲解提取只出现一次的数据，目的和上一讲一样，但我们的方法会有所区别。数据如下截图，我们要从A列给出的数据中提取只出现一次的数据。

思路分析和过程建立：今日我将利用字典和数组函数的方法实现，将数据装入数组，先将数据装入字典，同时区分一下哪个是只出现一次的数据，利用数组函数FLITER把有标识的数据区分出来，这种方法不用破坏字典数据的完整性，在后续还需要字典数据的情况下完全可以利用。下面看我给出的代码：

Sub mynzsz_62() '第62讲 利用字典和数组函数，同样实现提取只出现一次数据

Sheets("62").Select

'将数据放到数组中

myarr = Range("a1