杰瑞经常使用Dragon Naturally Speaking来创建文档。

当他这样做时，它将产生直接的引号和撇号，而不是“智能”的引号和撇号。 Jerry发现每次在文档中“说”文本时都要经过费力的“查找和替换”过程，因此他很想知道是否存在可以解决此问题的设置，或者比使用“查找并替换全部”更快的方法时间。

很明显，这里有两个角色：Word和Dragon Naturally Speaking。对于后者，从版本13开始，如果您在Word中启用了智能引号，则该程序将转录正确的引号（常规或智能）。有报告说，如果您使用Word作为Outlook电子邮件的编辑器，Dragon不会使用正确的引号。

如果您使用的是较旧版本的Dragon（或使用它来编写电子邮件），则可以在程序中创建一个特殊的单词，从而导致键入一个开端智能报价，而另一个单词输入一个结束智能报价。 。这样，您就可以“说出”引号，就像您说其他标点符号一样。

另一种方法是使用“查找并替换”将常规报价转换为智能报价。只要（再次）只要在Word中打开了智能引号，就应该能够搜索引号（“）并替换为引号（”）。当您单击全部替换时，它们都将更改为智能报价。您也可以对撇号执行相同的操作，以使其成为“智能”。如果需要，也可以通过使用宏来使该过程自动化。

Sub ReplaceQuotes()

Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = """"

.Replacement.Text = """"

.Forward = True         .Wrap = wdFindContinue         .Format = False         .MatchCase = False         .MatchWholeWord = False         .MatchWildcards = False         .MatchSoundsLike = False         .MatchAllWordForms = False     End With     Selection.Find.Execute Replace:=wdReplaceAll     With Selection.Find         .Text = "'"

.Replacement.Text = "'"

End With     Selection.Find.Execute Replace:=wdReplaceAll End Sub

在本技巧中，我曾多次提到确保在Word中打开智能引号。您可以按照以下步骤检查是否是这种情况：

。显示“ Word选项”对话框。 （在Word 2007中，单击Office按钮，然后单击Word选项。在Word 2010和更高版本中，显示功能区的“文件”选项卡，然后单击“选项”。）

。单击对话框左侧的校对。

。单击自动更正选项按钮。 Word将显示“自动更正”对话框。

。显示“键入时自动套用格式”选项卡。 （请参见图1。）

。确保选中带智能引号的直引号复选框。

。显示“自动套用格式”选项卡。 （请参见图2。）

。确保选中带智能引号的直引号复选框。

。单击确定。

注意：

如果您想知道如何使用此页面（或_WordTips_网站上的任何其他页面）中描述的宏，我准备了一个包含有用信息的特殊页面。

点击此处在新的浏览器标签中打开该特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（767）适用于Microsoft Word 2007、2010、2013和2016。