高分悬赏 word（或TXT）中怎样批量插入空行，每两行之间空一行

打开word里面的原文

菜单栏 点【编辑】 【替换】 【高级】 在 【搜索选项】 下面的【使用通配符】前面打上勾
【查找内容】框里输入
^13*^13
【替换为】 框里输入
^&^13
点全部替换 即可

1、点击【视图】--【宏】--【录制宏】
2、【请按新快捷键】输入F2
3、【宏】--【停止录制】
4、【宏】--【查看宏】--【编辑】
5、在SUB和END SUB 之间贴入下面代码
6、鼠标停在原文第一行的上一行，（如原文已经是第一行，上面补一空行），
7、按F2或【宏】--【查看宏】--【运行】

Dim I, TOTALROWS As Integer
TOTALROWS = ActiveDocument.BuiltInDocumentProperties("Number of lines").Value
For I = 1 To TOTALROWS Step 2
Selection.MoveDown Unit:=wdLine, Count:=2
Selection.EndKey Unit:=wdLine
Selection.TypeParagraph
Next I

word中可以用替换
光标定位在文首

ctrl+h
查找内容 (*^13*^13)
替换为 \1^13
勾选:使用通配符
单击全部替换

用按键精灵和word宏可以轻松搞定了。word宏： 点击录制宏，两次向下箭头，一次回车。
按键精灵脚本：录制向下箭头两次，回车一次，设置脚本为重复循环（或设定次数）。如果需要我可以录制好脚本，发到您的邮箱哦！

你这是想在英文后面插入空行。
可以试试这种方法：先查找任意字母加段落标记，再将其替换为查找内容加段落标记。
思路是：在英文段落标记后面再加一个段落标记。
我自己没试过，但是觉得可行，你可以试试看。