word批量替换特殊内容(可能用到正则表达式)
手头有个doc/txt格式的词典,有上万的词条,每个词条和释义都在同一行(用空格隔开),现在想批量地把每一行的第一个空格(位于词条和释义至今的那个)替换为tab分隔符,另...
手头有个doc/txt格式的词典,有上万的词条,每个词条和释义都在同一行(用空格隔开),现在想批量地把每一行的第一个空格(位于词条和释义至今的那个)替换为tab分隔符,另外还要批量删除所有不含空格的行,请问怎样操作?
展开
4个回答
展开全部
第一问:将每一行或者每一段中的空格替换为Tab制表符
方法:用Word打开doc或者txt文档,Ctrl+H打开替换对话框,单击高级,勾选使用通配符,在查找框中原样输入: {1,},替换为框中原样输入:^t,单击全部替换即可。(注意:查找框中的第一个字符为空格,然后接着输入{1,})
第二问:删除不含空格的行
方法一:将doc另存为txt文件,然后试试《文件批量处理百宝箱V8.0》中的“批替换”功能,选择txt类型和行处理模式,执行删除功能。
方法二:宏代码法,自己新建一个宏,将如下代码原样粘贴入宏代码中,按F5执行即可。
j = 1
For i = 1 To ActiveDocument.Paragraphs.Count
If InStr(ActiveDocument.Paragraphs(j).Range.Text, " ") = 0 Then
ActiveDocument.Paragraphs(j).Range.Delete
Else
j = j + 1
End If
Next i
MsgBox "删除完毕!"
方法:用Word打开doc或者txt文档,Ctrl+H打开替换对话框,单击高级,勾选使用通配符,在查找框中原样输入: {1,},替换为框中原样输入:^t,单击全部替换即可。(注意:查找框中的第一个字符为空格,然后接着输入{1,})
第二问:删除不含空格的行
方法一:将doc另存为txt文件,然后试试《文件批量处理百宝箱V8.0》中的“批替换”功能,选择txt类型和行处理模式,执行删除功能。
方法二:宏代码法,自己新建一个宏,将如下代码原样粘贴入宏代码中,按F5执行即可。
j = 1
For i = 1 To ActiveDocument.Paragraphs.Count
If InStr(ActiveDocument.Paragraphs(j).Range.Text, " ") = 0 Then
ActiveDocument.Paragraphs(j).Range.Delete
Else
j = j + 1
End If
Next i
MsgBox "删除完毕!"
展开全部
使用word文档批量处理大师软件,该软件的最新版已经含有高级替换功能,支持正则表达式的替换方式,推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用EXCEL更方便。读取时用空格做分隔符。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
-- 这个最好用 Perl 做--简单快捷
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询