作者:绿色风
分类:
时间:2022-08-17
浏览:398
楼主 嘉昆2011 |
问题陈述: 如何筛选出数据:首先以“最近出现时间”列进行自动筛选出数据中非连续天数据的最新日期,接着再按“累计出现次数”降序来排列,最后在处理后的结果中选取除标题外最高的10行。
1,辅助行+简单VBA 辅助列,判断是否为最新日期:- =C2=MAX(C$2:C$2082)
在利用VBA2003自动筛选动态日期范围时,Criteria1的34个参数不支持对最新日期的判断筛选,所以考虑添加一辅助列。 简易代码如下:- Sub Sort()
- '选定当前工作表
- ActiveSheet.Select
- '打开自动筛选
- Range("A1").AutoFilter
- '筛选出最新日期
- Range("A1").AutoFilter Field:=5, Criteria1:="True"
- '根据规模,降序显示10项符合内容的数据记录
- Range("A1").AutoFilter Field:=1, Criteria1:="23", Operator:=xlTop10Items
- End Sub
效果:
2,基本操作(筛选)+函数法: 多单元格数组公式:- =IF(MAX(C$2:C$2082)=C$2:C$2082,IF(A$2:A$2082>=LARGE(IF(MAX(C$2:C$2082)=C$2:C$2082,A$2:A$2082),10),1))
筛选出1即可。
效果:
附件:
筛选.rar
|
2楼 成就滋味 |
呵呵,真好~~ |
3楼 嘉昆2011 |
谢谢支持
|
4楼 嘉昆2011 |
谢谢支持
|
5楼 海洋之星 |
学习 |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素,
经与ExcelTip.Net站长Apolloh商议并征得其同意,
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示,
供有需要的人士查询使用,也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议,
可与本人沟通提出,或于本站点留言,我们会尽快处理。
在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一