HI，来吧，咱们一起来边练边学FREQUENCY！

香川群子

kuangben8 发表于 2014-10-13 12:49
第三题：如果是按顺序的不重复排序呢？
抛砖引玉下

【裙子老师，这个自定义函数有什么应用呢？】

答：
这个自定义函数也可以说是毫无用处……

因为它只是对正宗微软工作表函数=Frequency()的一个逆向工程，
所以没有更多的意义。

但也不能说是毫无意义……
1. 便于初通VBA的爱好者学习 代码实现方法
2. 便于能看懂VBA的人进一步了解、理解Frequency函数的算法原理
3. 如在工作表中使用时，可以不需要使用数组三键而通过输出参数k进行控制。……但实际意义不大。

呵呵。

香川群子

看见星光 发表于 2014-10-13 12:54
之后会有一个夹杂着数字、汉字、空格的提取不重复值，且按原有顺序排序。哈哈

顶楼图片关于第5条说明，更新一下吧。

Kelidai

此函数经常用。

看见星光

香川群子 发表于 2014-10-13 13:12
顶楼图片关于第5条说明，更新一下吧。

我记得我更新了啊。真是困到傻了，我把图片找出来，再换下。午安，裙子。

zhaojiaoyang200

我就是不用IF求和

1. =SUM(SIGN(FREQUENCY(B64:B75,B64:B75))*B64:B76)

复制代码

sw=andy

搬张小板凳坐着听课！

sw=andy

求和：
=SUM(IF(FREQUENCY(B64:B75,B64:B75),B64:B75))
排序
=IFERROR(LARGE(IF(FREQUENCY($G$64:$G$75,$G$64:$G$75),$G$64:$G$75),ROW(A1)),"")

依然潇潇

星光这面大旗在函数版块一直是屹立不倒的，兄弟我在VBA版块扫盲这段时间仍然会为你擂鼓加油的！加油！

人事难料

不用IF你咬我啊
求和

1. =SUM((FREQUENCY(B64:B75,B64:B75)<>0)*B64:B76)

复制代码

排序

1. =LARGE((FREQUENCY(B$64:B$75,B$64:B$75)<>0)*B$64:B$76,ROW(A1))

复制代码

数组下拉
PS：我一定是早上忘吃药了，针对第二题做了一个很无聊且不通用的写法。

1. =--MID(SUM(FREQUENCY(C46:C57,{88,97})*10^{4;2;0}),2,2)

复制代码

这几天有空就来观摩一下这个帖子，诚如楼主所言，此函数绝对是函数拦路虎之一。
如果能摸透FREQUENCY、mmult、text这三个函数，感觉就像是打通任督二脉一样可以得到一个飞升。
我现在只是摸了这仨的一点毛皮，郁闷啊，明显智商余额不足。

aoe1981

香川群子 发表于 2014-10-13 12:45
对Frequency()工作表函数、进行VBA逆向工程破解，得到如下自定义函数：

=frq([统计对象数据区域 DataR ...

　　香川，代码没看明白，但是测试出了一个不一样的地方：
　　
　　个人感觉这个函数可以不用写这么复杂呀，是不是您在尽量仿照或超越系统自带的Frequency函数？