在vba word中,如何跳过前两行的执行

在vba word中,如何跳过前两行的执行,vba,ms-word,Vba,Ms Word,在编写word宏时,我发现在前两行插入启动命令按钮非常有用,这样就可以保存文档并随时插入各种文本,以便进行本地处理 例如,以下宏删除文档中的所有回车,并链接到位于第一行的命令按钮DelAllCRLF。当我按下按钮时,它被删除,因为第一行被视为回车,尽管它包含按钮 Private Sub DelAllCRLF_Click() ActiveDocument.Content = _ Replace(ActiveDocument.Content, vbCr, " ") End Sub 请协助使

在编写word宏时,我发现在前两行插入启动命令按钮非常有用,这样就可以保存文档并随时插入各种文本,以便进行本地处理

例如,以下宏删除文档中的所有回车,并链接到位于第一行的命令按钮DelAllCRLF。当我按下按钮时,它被删除,因为第一行被视为回车,尽管它包含按钮

Private Sub DelAllCRLF_Click()
  ActiveDocument.Content = _
  Replace(ActiveDocument.Content, vbCr, " ")
End Sub

请协助使宏从第3行开始执行。

遗憾的是没有解决,但找到了一个解决方法: 现在,我在早期版本的功能区或Excel 2003工具栏中添加了一个按钮,而不是将它们放在文档空间的开头,这样它们就不会被删除


如果我找到了上述初始问题的解决方案,我将发布。

我不确定我是否理解其意图,将按钮放在功能区上似乎是更好的解决方案,但您可以替换从第三段开始的文本vbCr是段落分隔符:

ThisDocument.Range(ThisDocument.Paragraphs(3).Range.Start) _
    .Find.Execute vbCr, Replacewith:=" ", Replace:=wdReplaceAll

Application.ScreenRefresh ' optional

谢谢你,我会的!