vba字典重复key_【Excel 函数+VBA】 计算不重复个数

计算不重复个数的3种方法，两种是函数，第三种是VBA（入门）。1. Sum函数和Countif函数

解释：
对COUNTIF(F5:F12,F5:F12)计算得到一维数组{1;2;3;3;4;4;4;5}。
对应每个数字的频数：3出现了2次，4出现了3次，所以在数组里面有2个2，3个4。
如果有N个，即会出现N次。
然后通过1/COUNTIF(F5:F12,F5:F12)得到数组{1;1;0.5;0.5;0.333;0.333;0.333,1}，重复N次的数据会变成1/N，同时出现N次，这些数据累计相加就会巧妙的变成1
最后对SUM求和，便可以得到不重复的数字，5种1/2/3/4/5.注意：
输入公式后，一定要同时按住Ctrl+Shift+Enter。 这才出现"{}"符号。

2. Sumproduct函数和Countif函数

解释：
与第一种方法大同小异，推荐第二种方法。
Sumproduct函数的参数种就包含了数组，因此直接输入公式即可。

3. VBA

解释：
利用字典Key的特性-唯一性
以及字典常用属性.Count 计算。
这里可以改造Function自定义函数，或者交互式的模块。