Word 宏中的引号

Question

我正在尝试使用 Word 宏来查找和替换一些文本。我的部分原始文本是斜体的（我们的笔记本），我希望替换文本将这些斜体字用引号 ("Our Notebook") 括起来并删除斜体。我的 'bad' 代码如下所示。有没有简单的解决方法？

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
    .Text = "From Our Notebook"
    .Replacement.Text = "From "Our NoteBook""
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With

Answer 1

我相信我已经弄明白了。解决方法是用两个双引号表示一个单双引号的输出。由于这些必须放在一组双引号内（例如，.Replacement.Text = "From ""Our NoteBook"""），所以您最终会得到很多引号！