新年好，要将网上的名字导入EXCEL，计算出现的频率与排序如何实现自动过程呢？

zero07

ad1
ty2
di8
kkkl
dkfd
dfle
fda
sldkf

我每天要将像上面的网上的数据，大约是20个，拷入到Excel做统计，以计算那一项出现次数最多按排序最高排列。
我的做法是每天将像上面的数据在Excel一直往下粘贴，然后大概到了一个月就列用数据透视表，在另一列全部输入1，来计算各项出现的次数，然后在排序。
但是这样太麻烦了，能否我只做第一步，就是把数据粘贴入便能自动排到数据库的后面，自动成为1，自动像数据透视表的计算，自动排序呢。应该怎样做呢？

pureshadow

没太懂，猜一下：
是不是就只要统计一段时间后各值出现的频率？
这个好办，不一定要用数据透视表。
=countif(a:a,a1)下拉

zero07

但是这些值是如上面的英文或中文，每天放20项以上，会有重覆，现就是记算其出现的频率并排序次数排在头位。
所以好像只能在右列增加1再用数据透视表弄成这样，但是每天还必须有新数据放于下面继续加入计算，因而每隔一段时间都要重覆工序。

pureshadow

计算频次可以直接用公式=countif(a:a,a1)然后下拉
如果一定要用数据透视表,又怕每次更新透视表麻烦,可以设置一个活动区域,公式为
=offset(a1,,,counta(a:a),1)
再把这个做成自定义函数名称,数据透视表区域引用这个自定义函数名称即可.

zero07

请问直接用公式=countif(a:a,a1)
是如何操作，在哪里放这条公式，如何下拉呢

pureshadow

那些中文英文的放在A列,公式放在B1后下拉

pureshadow

做了个文件

zero07

谢谢pureshadow，辛苦了，
版主做的数据透视表，可以刷新，支持添加新数据这样就解决问题了。
但为什么我新建透视表却刷新无效呢，是下面这个吗？
=offset(a1,,,counta(a:a),1)
再把这个做成自定义函数名称,数据透视表区域引用这个自定义函数名称即可.

我试了几次不成功，不明什么是自定义函数名称。

pureshadow

把我做的表打开,在菜单上找插入-名称-定义,就可以看到了.

欢欢

vba法，不用你动脑，直接点控件就好了，把数据粘贴在j列，出现频率在k列