如何让被强行换行的内容回复原位

流水淘金

有时候遇到某些文档，所有的行在某一位置都被强行换了行，如下图：

要是手动一个个去退格让每一段落只存在一个回车键，就太劳心劳力了！在网络上找了一些方法，没有特满意的！
有什么好的办法，能快速让每一段只存在一个回车键，而不像上图中，每一行的末尾都存在一个回车键？
附上一个样本，让高手们有的放矢...

踏雪访梅

楼主可试试如下办法：
把整个文章复制到一个空白word文中(以2003版为例)：
1、按CTRT+F，打开查找与替换对话框。在查找栏输入 “^p ”（说明：^p是回车符），直接单击替换；
2、按CTRT+F，打开查找与替换对话框。在查找栏输入 “     ”（说明：引号内是4个空格），在替换栏输入“^p”，单击替换；
3、全选整篇文档，格式-->段落-->特殊格式-->首行缩进-->2字符。

流水淘金

踏雪访梅 发表于 2014-11-21 08:59
楼主可试试如下办法：
把整个文章复制到一个空白word文中(以2003版为例)：
1、按CTRT+F，打开查找与替换对 ...

听你这一提示，才意识到了这个每段落的段首前面有四个半角空格，倒是有迹可寻...
要是段首前面没有空格的话，这个方法就行不通了，貌似前面没有空格的情况居多，有没有通吃的方法？

踏雪访梅

流水淘金 发表于 2014-11-21 11:38
听你这一提示，才意识到了这个每段落的段首前面有四个半角空格，倒是有迹可寻...
要是段首前面没有空格的 ...

根据平时经验，乱七八糟的、一点规律没有那种，除手动处理外，应该没有其他好办法了。

周星骋

用WORD打开文本文件，
然后用Ctrl+H打开替换对话框，
勾上“使用通配符”，
查找内容：
([!^13]{35,})^13

替换为：
\1

最后点“全部替换”按钮。

说明：查找内容中的35，可以改，根据你满满一行大概占多少个汉字（因为各个段落最后一行一般不会占满行），所以大致可以按这个规律判断。


可惜我回复时用“高级模式”发不了图片，也发不了代码。

周星骋

原来是我在IE11里忘了将本坛添加到兼容性视图。
还以为是哪个版主欺负俺呢。
好了，代码补上来，图也补上来。
勾选“使用通配符”，
查找内容

1. ([!^13]{35,})^13

复制代码

替换为

1. \1

复制代码

413191246se

拷贝到WORD中后，可以用VBA宏来处理。

流水淘金

周星骋 发表于 2014-11-21 18:07
原来是我在IE11里忘了将本坛添加到兼容性视图。
还以为是哪个版主欺负俺呢。
好了，代码补上来，图也补上 ...

要的正是这种方法，高人呀，膜拜！

cuteword

http://club.excelhome.net/thread-664005-1-2.html
我写过这个功能，请在360软件管家中下载上面帖子中的软件：word灵感百宝箱，具体在整理——删除冗余回车

周星骋

流水淘金 发表于 2014-11-23 09:55
要的正是这种方法，高人呀，膜拜！

呵呵，不高，不高。基础应用而已。
不像某些人，刚学会一点点 VBA 基础，遇到什么简单问题都要先问人家懂不懂VBA。
WORD已有的功能，完全没必要用VBA。（在不需要编程进行批量处理的情况下。）
还有，“在网络上找了一些方法，没有特满意的”，那你还不如到 ExcelHome 找特意的。