作者:手机用户2502861905 | 来源:互联网 | 2023-09-16 14:55
建立“桌面﹨统计”文件夹,建立“桌面﹨统计﹨报表”文件夹。统计文件夹存有:结果.XLS。报表文件夹存有:每个工作日的报表分析.XLS(举例是:2013-06-05报表分析.XLS
建立“桌面﹨统计” 文件夹,建立 “桌面﹨统计﹨报表” 文件夹。
统计文件夹 存有: 结果.XLS。
报表文件夹 存有: 每个工作日的报表分析.XLS(举例是:2013-06-05报表分析.XLS),一日一工作簿。
步骤1:从 当日报表分析.XLS(举例是:2013-06-05报表分析.XLS) 将“日期 (可以从文件名中提取,也可以从表格第一行提取)”在 结果.XLS 中从第4行起隔行在A列填入。
步骤2: 从 当日报表分析.XLS(举例是:2013-06-05报表分析.XLS)中的2000多条记录中筛掉 “标3”<30的记录。
步骤3:从上述筛剩下的记录中筛选出当日 “指2”最大的记录。
1)如果“指2”最大的记录“指2”<6 ,则当天“筛选1”无效,不进行步骤4。(即当天“筛选1”空白无数据)
2)如果“指2”最大的记录“指2”>=6,且是唯一,则直接进行步骤4。
3)如果“指2”最大的记录“指2”>=6,但有“指2”并列最大的多条记录,则对这些“指2”并列最大的多条记录按“标1”进行二次排序,选出其中“标1”最大的记录。
3.1)如果二次排序结果唯一,则进行步骤4。
3.2)如果二次排序结果依然有“标1”并列最大的多条记录,则对这些“指2”、“标1”双双并列最大的多条记录进行三次排序,选出“指4”最大的记录。 (经过这样最多三次排序,可以确保选出唯一记录)。
步骤4:对选出的记录将 “名称”、“标2+% ”填入 结果.XLS中相应日期的“筛选1”。 (当日报表分析.XLS保持原始数据一切状态不变)
步骤5:将“桌面﹨统计﹨报表” 文件夹中 每个工作日的报表:2013-06-06报表分析.XLS、2013-06-07报表分析.XLS、2013-06-10报表分析.XLS、2013-06-11报表分析.XLS… 按日期顺序填入 结果.XLS,并且每当有新的报表加入“报表”文件夹,则自动计算增加 结果.XLS(如果不能实现自动,手动也行)(旧的每个工作日的报表如果没修改,则 结果.XLS 对应的数据最好不用每次重复计算,以提高计算速度)。
(降低难度:如果不能实现多个工作薄的数据排序筛选后导入另一个工作薄的工作表里,那我可以先手工将多个工作薄的数据导入到一个工作薄,一天一张工作表。
如果这样降低难度后可行,请高手帮写 三重排序筛选 代码。)
(结果.XLS 、 每个工作日的报表分析.XLS 图片在2楼。图片顺序反了,改不了。 csdn发贴不能上传附件吗?本想把 结果.XLS 、 每个工作日的报表分析.XLS 用附件上传的)
14 个解决方案
lz如果 每个工作日的报表分析.XLS 不是很多的话自己手动操作不行吗
通过EXCEL的 数据 - 排序 - (三重排序条件)
来操作也不是很麻烦,毕竟你已经都想自己把多个excel导入到一个excel里了,每个工作日的报表分析.XLS估计也不是很多
如果非得要vba代码的话 就把数据文件传上来 不然你自己还得改
这类文件 上传到CSDN的下载资源 里不知道行不行
http://pan.baidu.com/share/link?shareid=1313541472&uk=2534319191
alt + F11 查看代码
以sub开头的是对应宏的入口
代码没写注释 ......
轴承 77% 我这里显示正常
空白的那个似乎不该显示空白