ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] word用替换法删除植入的文字广告

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-5-26 13:10 | 显示全部楼层 |阅读模式

从小说天堂里下载的文档中间穿插了很多植入该网站文字的广告,这些文字五花八门,例如以下这些文字就是其中的一部分,但是有一个共同特点,包含了”小说天堂wxiaoshutxne” 这些部分字符,大小写以及粗体字都有,而且文字数不超过50个,有的是单独占一行,有的是在一段文字的结尾处,如果用人工去找,很费时间,希望用替换法删除,多谢,如果有这方面高水平的大侠,可以在淘宝网上卖这项技能,淘宝网上有两家答疑word问题的,但是替换法水平都不行
,,
例如插入的广告样式:
#txt$!小@说天^堂&t-xt-小-说-天.堂
《t》xt小说天堂
(/t/xt|小/说天|堂)
~小  说t xt 天,堂
_t_xt,小说天堂wWw:xiaoshuotxt?net
t,xt,小,说,天,堂
txt小xiaoshuo说天堂
www.xiaoshuotxt。net
小~说~t.xt`天~堂
xiaoshuotxt。com
[t.xt小,说[天堂}
^t*xt-。小%说天.堂ww w . xia oshu otxt.ne t
[t.xt小,说[天堂}www。xiaoshuotxt.net
例如这段文字就插入了广告:
昔夏之方有德也,远方图物,贡金九牧,铸鼎象物,百物而为之备,使民知神奸。故民人川泽山林,不逢不若。魑魅魍魉,莫能逢之。用能协于上下,以承天休。t,xt,小,说,天,堂
www。xiaoshuotxt。com
第2章
t?xt_小_说天\堂
    以饕餮为代表的青铜器纹饰具有肯定自身、保护社会

TA的精华主题

TA的得分主题

发表于 2018-5-26 17:14 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
哈哈、朋友,上传整部小说,这个问题应该难不到这里的大神!

TA的精华主题

TA的得分主题

发表于 2018-5-27 11:13 来自手机 | 显示全部楼层
试试去“ 杂 ”,整理成“txt小说天堂wxiaoshutxne”,再在量删除。

TA的精华主题

TA的得分主题

发表于 2018-5-27 11:16 来自手机 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-5-27 11:19 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
QQ联系我,直接写一个纯净版的采集器(87735874,注明加好友原因,否则不加)

TA的精华主题

TA的得分主题

发表于 2018-5-27 13:26 | 显示全部楼层
xyz74sc 发表于 2018-5-27 11:19
QQ联系我,直接写一个纯净版的采集器(87735874,注明加好友原因,否则不加)

期待张老师的分享……

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-5-27 14:37 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
例文:
可那是10年前的事,现今别说深圳,就是香港最繁华的商业用地能开出5万元1平米的价来,也是少有的超级新闻了。但义乌的6.9万元1平米是在1998年发生的事。有道是,贫市长街不留一分银,贵市寸土卖得成吨金。可见义乌的"市"含金量之高。~小  说t xt 天,堂


wWw.xiAoshUotxt.cOm


第3节:第一章三个里程碑(1)

<t<xt>小<说天?堂

第二件事是我今年初再赴义乌途中的一路感受。那夜我下飞机出杭州城已过10点钟,从西子湖畔到义乌需要近3个来小时的夜路。小说原本以为可以偷着一路眯盹。

但后来始终没能,因为我的双眼完全被公路上车水马龙的热闹景象所感染,而这样的感受使我一下联想起,一年前我访美时从纽约到华盛顿那一段夜路。


#txt$!小@说天^堂&t-xt-小-说-天.堂

《t》xt小说天堂

(/t/xt|小/说天|堂)

_t_xt,小说天堂wWw:xiaoshuotxt?net

t,xt,小,说,天,堂

txt小xiaoshuo说天堂

www.xiaoshuotxt。net

小~说~t.xt`天~堂

xiaoshuotxt。Com

[t.xt小,说[天堂}

^t*xt-。小%说天.堂ww w . xia oshu otxt.ne t

[t.xt小,说[天堂}www。xiaoshuotxt.net

TA的精华主题

TA的得分主题

发表于 2018-5-27 15:31 来自手机 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
hbswxs 发表于 2018-5-27 14:37
例文:
可那是10年前的事,现今别说深圳,就是香港最繁华的商业用地能开出5万元1平米的价来,也是少有的超 ...

直接爬虫 不就行了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-5-28 17:16 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
试试去“ 杂 ”,整理成“txt小说天堂wxiaoshutxne”,再在量删除。--------不明白这种方法,请详细一点,多谢
直接爬虫 不就行了。--------不明白这种方法,请详细一点,多谢, 我库存有很多篇小说天堂的文章
QQ联系我,直接写一个纯净版的采集器(87735874,注明加好友原因,否则不加)------以便联系,没解决问题,

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-5-28 23:46 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
我编一个替换公式:[小说天堂wxiaoshutne]?[!^13]@{6,55}^13,意思是:包含了[小说天堂wxiaoshutxne]这些字符的,中间没有回车符的连续的,4个字符以上50个字符以下的,后面有回车符的的1小段文字,全部删除,确实能删除,但留下一些符号,这无所谓,但是把这样的有用的东西也删除了,例如,<奶奶说:"这小子今后肯定要出奇迹!">,删除之后变成了<奶奶>,说及后面都没有了,请教高手问题出在哪里?
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2025-1-12 01:47 , Processed in 0.036175 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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