ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 3871|回复: 5

[求助] VBA进行大量的文本文件内容编辑

[复制链接]

TA的精华主题

TA的得分主题

发表于 2014-12-26 20:14 | 显示全部楼层 |阅读模式
我有大量的文本文件,有上千个该类文件.分别位于不同的文件夹内,且文件名称无规律性.我现在需要将这些文本文件的内容做些改动,想借助Word的VBA来实现.
要求:
1.指向文件夹,word自动打开该文件夹内的所有文本文件,对文本文件内容进行逐个编辑;
2.打开文本文件后,搜索指定的字符串1,删除所在行的内容;
3.搜索指定的字符串2,替换为字符串3;
4.删除该文本文件内的最后一行(文本文件中的行数不定);
5.编辑文本文件完成后,另存一个增加标示的文本文件,如: AA_123.TXT;
6.自动进行该文件夹内下一个文件的编辑.


要求有点多,希望vb高手能帮忙解决一下!!

样品文件.zip (536 Bytes, 下载次数: 16)


TA的精华主题

TA的得分主题

 楼主| 发表于 2014-12-27 17:39 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
发帖的时间不对吗?无人问津!!!
大师们都休息了!!!

TA的精华主题

TA的得分主题

发表于 2014-12-27 18:44 | 显示全部楼层
楼主,你的附件太虚拟!能否提供比较真实的样稿?这样大家才好有的放矢。大师们忽来忽去,不必盼着他们。须知,自己动手,丰衣足食。

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-12-27 21:16 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
413191246se 发表于 2014-12-27 18:44
楼主,你的附件太虚拟!能否提供比较真实的样稿?这样大家才好有的放矢。大师们忽来忽去,不必盼着他们。须 ...

非常感谢您的关注!!!
附件中的文本文件应为种种原因做了一些改动,不方便提供源文件.
文件中的格式与我的源文件格式一致,只是关键字替换掉了,我自己也试图做这样的vba,苦于这方面的知识量比较匮乏,也从论坛及网上查看了一些相关的资料,还是没办法解决,所以只好发帖求助各位大师了!!!

TA的精华主题

TA的得分主题

发表于 2014-12-27 23:43 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
楼主呀,你是做保密工作的?样稿中不是A,B,就是X,我是一头雾水啊!想帮你也无从下手。
比如:Folder        : BBBBBBBB           -----------------希望可以删除此行
  Folder        : CCCCCCCCCC       ---------------------------------------此行不删除,不做改动
这两行以什么为区别呢?以缩进为区别?还有,最后一行删除,到底是一行,还是一段?
***希望楼主提供比较真实的样稿,比如某市,你可以说是XX市即可,全是A,B,X,我是看不明白。

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-12-28 11:29 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
413191246se 发表于 2014-12-27 23:43
楼主呀,你是做保密工作的?样稿中不是A,B,就是X,我是一头雾水啊!想帮你也无从下手。
比如:Folder    ...

再次感谢!!
我自己的思路上有了些出入,原以为只能使用的word的vba才可以实现!
通过论坛中其它的帖子:http://club.excelhome.net/thread-772287-1-1.html
解决了我文本文件中需要替换的问题!!!
删除指定字符所在行,实现的方法我再找找看!后续还会跟进!
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2025-1-16 13:02 , Processed in 0.023480 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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