如何在 Word 文档中将“Shift+Return”替换为“Return”答案

【问题标题】：How to replace 'Shift+Return' with 'Return' in a Word Document如何在 Word 文档中将“Shift+Return”替换为“Return”
【发布时间】：2017-01-12 03:09:06
【问题描述】：

我有一个带有“Shift+Return”（显示为从上到下和左上角的箭头）而不是“Return”（结束段落）的 Word 文档，因此，如果我试图证明其合理性，我的格式有误。

我试图用这个替换：

WordBasic.EditReplace Find:=Chr(11), Replace:=vbCrLf, Direction:=0, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, ReplaceAll:=1, Format:=0, Wrap:=1

还有这个：

WordBasic.EditReplace Find:=Chr(11), Replace:=vbNewLine, Direction:=0, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, ReplaceAll:=1, Format:=0, Wrap:=1

但我得到一个“正方形”作为新行的第一个字符。

我的代码有什么问题？

【问题讨论】：

标签： vba ms-word

【解决方案1】：

仅供参考，Word仅供参考
“段落标记”的回车（vbCr = Chr(13)，或 ^p 特殊字符）
和“手动换行符”的垂直选项卡（vbVerticalTab = Chr(11)，或 ^l 特殊字符）

【讨论】：

【解决方案2】：

解决方法：

WordBasic.EditReplace Find:=Chr(11), Replace:="^p", Direction:=0, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, ReplaceAll:=1, Format:=0, Wrap:=1

或

WordBasic.EditReplace Find:="^l", Replace:="^p", Direction:=0, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, ReplaceAll:=1, Format:=0, Wrap:=1

【讨论】：