ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: lhj323323

[已解决] 提速,提取4000多个txt,耗时56.39秒,谢谢prome3、wanghan519、lxdexcel等诸位老师!

[复制链接]

TA的精华主题

TA的得分主题

发表于 2024-2-15 15:02 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
241 或者 242 是没有多大区别的,241行数是准确的,但是因为每行的字节数不相同,所以不能准确定位到要找的那一行,多加几行只是为了保证所找的数据包括在查找范围内,这个代码只是查找最后一天的第一个数据,如果想查找其他日期的数据是不能用的,即使更改了查找日期也是不行的。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-15 22:18 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
lxdexcel 发表于 2024-2-15 15:02
241 或者 242 是没有多大区别的,241行数是准确的,但是因为每行的字节数不相同,所以不能准确定位到要找的 ...

也即是,这组代码是写死了的,只能用于查找【最近一天】的第一分钟数据。

我理解对了吗?

TA的精华主题

TA的得分主题

发表于 2024-2-16 03:25 来自手机 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
lhj323323 发表于 2024-2-15 22:18
也即是,这组代码是写死了的,只能用于查找【最近一天】的第一分钟数据。

我理解对了吗?

可以先正常搜一个文件,确定倒数的行数,再对于之后的文件seek到那附近再搜,对于没搜到的文件,再重复以上步骤,应该很快
所以说上面的代码只是展示了先缩小范围,再整块搜是很快的,可以灵活的用也不算写死了

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-16 09:09 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
prome3 发表于 2024-2-14 21:37
代码的思路我弄清楚了,确实很妙。倒不是说用了Seek,因为一开始我看到这个贴子的时候立马就想到了Seek跳 ...

回复95楼

老师,我今天才看到这层楼的内容,不好意思
回复如下
73楼的代码,我验证过,当时报错并贴图了,我猜想出错的原因会不会是
同路径的txt的个数,由40个,增加到4415个
73楼的代码,在逻辑上,肯定是正确的,后续的修改,也仅是【程度】的变化。

ReDim vResult

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-16 09:18 | 显示全部楼层
wanghan519 发表于 2024-2-16 03:25
可以先正常搜一个文件,确定倒数的行数,再对于之后的文件seek到那附近再搜,对于没搜到的文件,再重复以 ...

老师:
你在95楼所说的
【试着把他的代码改为按日期查找的,亲身体验一下其中玄妙】
我也觉得有可行性,
但lxdexcel老师在105楼说回复如下
【这个代码只是查找最后一天的第一个数据,如果想查找其他日期的数据是不能用的,即使更改了查找日期也是不行的】

TA的精华主题

TA的得分主题

发表于 2024-2-16 09:37 | 显示全部楼层
lhj323323 发表于 2024-2-16 09:09
回复95楼

老师,我今天才看到这层楼的内容,不好意思

你这是代码运行调试,而非验证或者测试。前者在于代码语法的正确性,后者关注代码逻辑的正确性,以及最终结果的正确性。

如果你真看明白了他的代码,也就可以自己调试,而不用为一个小小的Redim vResult发截图来问了。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2024-2-16 12:32 | 显示全部楼层
他的样本日期并不统一,就最后几天一样,前面基本不同。文件最大的字节100多万,最小才8万多。坐等高手怎么用seek定位日期。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-2-17 08:10 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
yuwd3 发表于 2024-2-16 12:32
他的样本日期并不统一,就最后几天一样,前面基本不同。文件最大的字节100多万,最小才8万多。坐等高手怎么 ...

大致有点理解您的意思了。
多谢老师。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-5-1 13:07 , Processed in 0.041885 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表