Question

我有一个带有＆＃39; Shift + Return＆＃39;的文字文件。（从上到下显示为箭头）而不是＆＃39;返回＆＃39; （结束段落），所以，如果我试图证明，我的格式错误。

我试图用这个代替：

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

但我得到一个＆＃34; square＆＃34;作为新线的第一个字符。

我的代码有什么问题？

Answer 1

解决：

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

Answer 2

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

如何替换＆＃39; Shift + Return＆＃39;与＆＃39;返回＆＃39;在Word文档中

2 个答案: