[分享]替换空行速度记之一

雨雪霏霏

　　孔兄有这精益求精的态度，实是“最可怕”的，还请孔兄同时注意多多参加体育锻炼。 　　孔兄的“超快”宏高明的还有一处：点按工具栏“撤销”按钮或按Ctrl+Z键，可以一步恢复粘帖前的文档界面，小弟目前还少见到如此便捷的“删除空行”宏。 　　孔兄的“超快”宏运行结果，有时不能达到“干净”粘贴的目的——段末仍余留一两个半角空格或一个制表符。 　　小弟曾在网上看到，选定文档内容，点按工具栏上的“居中”按钮后，再点按“两端对齐”按钮，可以将段首与段末的所有空格、制表符清除干净。但奇怪的是用宏来对选定内容先“居中”后“两端对齐”（宏代码分别是：Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter和Selection.ParagraphFormat.Alignment = wdAlignParagraphJustify），却无此效果，不知Word中工具栏上的这两个按钮为何比菜单里的命令更为神通广大。请求大家帮忙解释。 　　殷切期待孔兄在“超快”的基础上更“快”更“干净”！

雨雪霏霏

　　期待孔兄比“超快”更理想的删除空行宏。 　　另外两个设想，请大家帮忙。 　　第一种宏： 　　实际情况： 　　1、在论坛里复制VBA代码，要粘贴到Word后打印，保持缩进外观； 　　2、必要时，还可以再把VBA代码从Word文件里复制到VBE中应用，保持缩进外观。 　　要求： 　　1、粘贴后所有手动换行符都应该变成了段落标记； 　　2、把空行（即没有任何汉字、英文字母、标点符号的行）删除； 　　3、保留文章每段段首的空格； 　　4、段首段末的制表符不必保留； 　　5、像孔兄“超快”宏一样，如果要“撤销”粘贴，只要一步就可回到Word文件原来的状态，而不需要点好多次“撤销”才能回去。 　　第二种宏： 　　实际情况： 　　1、用第一种宏粘贴后保留下来的段首空格，在按了工具栏上的“居中”和“两端对齐”按钮后便全部消失了，这十分限制了Word文件日后的排版整理； 　　2、有的时候，还需要把代码前后附有的作者的一些文字一起复制； 　　3、只是想在Word中的外观上看到缩进，不要求从Word文件复制粘贴到VBE中要保持缩进外观。 　　要求：自动将每段段首的空格转换成相应距离的首行缩进——比如哪段是原来是十个空格，便自动转为十个空格距离的缩进。（请注意，一个全角空格等于两个半角空格。） 　　两种宏的效果图：把9楼的信息复制粘贴到Word后，最终效果如下图（请注意两种宏的标尺缩进变化）

liujy

下载学习使用了,效果不错!谢谢孔兄的努力!

konggs

我以前有过这方面的讨论.你可以搜一下.

现在,对这个不太感兴趣了.

我现在对智能文档感兴趣.

jb_008

[em12]

tengsz

谢谢1楼版主，非常好用！！

gddtgjz

下来试用一下。

寻找殒梦

谢谢老大分享！！！谢谢分享！！！

lister135135

谢谢分享！

leafsea

发现楼主的办法在大的文档（光文本就几M甚至十几M）中还是很慢。我的解决方法是使用vim，通过正则表达式解决。