WORD相关,能实现搜索某个关键字,删除当前关键字的行吗?
- zj1234502几十W条数据,手动筛查我估计要通宵也做不完了,不知道有没同学知道怎么操作的,麻烦指导下。谢谢
WORD里。
例如
188160180,杭州,2009-03-02 14:57:05,免费手机邮箱
157598672,绍兴,2009-03-06 18:04:47,免费手机邮箱
155878183,温州,2009-03-06 18:06:16,5元手机邮箱
1362771769,温州,2009-03-06 18:06:29,5元手机邮箱
136818598,杭州,2009-03-06 18:10:11,5元手机邮箱
13326053377,台州,2009-03-06 18:12:43,免费手机邮箱
13305833877,嘉兴,2009-03-06 18:15:17,5元手机邮箱
我想搜索杭州。搜索到2条杭州的信息,想把这2条信息的当前行也给删掉。
得出的结果是这样
157598672,绍兴,2009-03-06 18:04:47,免费手机邮箱
155878183,温州,2009-03-06 18:06:16,5元手机邮箱
1362771769,温州,2009-03-06 18:06:29,5元手机邮箱
13326053377,台州,2009-03-06 18:12:43,免费手机邮箱
13305833877,嘉兴,2009-03-06 18:15:17,5元手机邮箱 - 慕翔宇按照杭州这一列进行筛选,然后把删选结果一口气删除。lz你的了解?
- wascooword也可以筛选?
- 宝塔震河妖正则表达式……我记得word应该是支持的
- watashi都是这样统一的格式的话可以贴在excel里,再以逗号为分列符进行分列,然后就是2楼说的了,最后再用concatenate函数把结果里断开的部分用逗号连接起来贴回word。话说当初这种数据直接以excel保存不是挺好的么,为啥用word……
本帖最后由 watashi 于 2010-11-25 16:54 通过手机版编辑 - edream正则表达式,貌似word不支持,如果格式不重要的话,存为txt,用ultraedit打开,然后搜索“%*杭州*^p”(无引号),替换为的地方不用填,勾上正则表达式选项就能达到你的目的了
- wanghujin记得看过一篇文章,似乎用一段vba程序可以。具体想不起来了。
- river如果楼主确定你的数据格式都没问题的话,可以试试这个。本人菜鸟,出错不要找我哦
。。记得先备份文档。。。。
添加个按钮,命令用下面的。放在文档的第一行,数据从第二行开始。然后离开编辑模式狂点按钮,当按钮被自己删除掉的时候就好了。循环命令懒得写,偷懒。。。
Private Sub CommandButton1_Click()
Selection.Find.ClearFormatting
With Selection.Find
.Text = "杭州"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.HomeKey Unit:=wdLine
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Delete Unit:=wdCharacter, Count:=1
End Sub
[本帖最后由 river 于 2010-11-25 17:12 编辑] - zj1234502谢拉大家。
EXCEL 和 宏方法都可行
开窍了~哈哈 - 发骚专用马甲搭车问,word能替换回车符号么
- lvcha嗯,lz
word我不会,ultraedit实现很容易。
你可以把文本copy到ultraedit里,处理完再copy回来?
ultraedit用宏就行,把重复的操作录一遍,再回放若干遍即可。 - 啊扑^p = 回车
- jinwyp不用分列 直接就可以筛选 包含文本"杭州"
- zhaolinjia8楼厉害,虽然看不懂就是喜欢
- 逃啊逃啊逃搭车问,中英文字符的标点符号可以转换吗?
- N00B可以
替换里的高级-特殊字符里就有