桑迪问如何找到引号之间的所有文本并将其格式化为粗体。该解决方案需要能够处理引号之间的多个单词（需要用粗体显示的整个短语）。这是一个有趣的问题，有几种解决方法。

一种方法是使用Word强大的“查找和替换”功能来完成所需的工作。请按照下列步骤操作：

。按Ctrl + H。 Word将显示“查找和替换”对话框的“替换”选项卡。 （请参见图1。）

。在“查找内容”框中，输入以下内容：

。必须按原样输入，不能带空格。第一个竖线之后的字符是一个开始的智能引号，而第二个竖线之后的字符是一个结束的智能引号。通过按住Alt键并在键盘上键入0147作为第一个，然后在0148作为第二个，在对话框中输入智能报价。

。将插入点移到“替换为”框中。

。单击格式，然后单击字体。 Word将显示“替换字体”对话框。

（您可能需要单击更多按钮才能看到格式按钮。）

。单击字体样式列表中的粗体选项。

。单击确定。

。确保已选中“使用通配符”复选框。

。单击全部替换。

请注意，当Word完成此搜索和替换后，它不仅会加粗引号内的文本，还会加粗引号本身。

如果您想将引号恢复为正常，则可以执行另一个通配符搜索，这次仅查找[“ |” |“]（步骤2，最后两个引号是打开和关闭智能引号）并将其替换为不是粗体格式（第5步）。

|有趣的是，您必须搜索[“ |”] [“ |”]而不是简单地搜索“”。原因是非常简单。如果您要从其他人那里获取文档（正在格式化的文档），那么您就不会立即知道他们是使用智能引号，常规引号还是两者结合使用。竖线两侧的两种类型的引号，就是告诉Word与开头或结尾的引号类型匹配。选择了“使用通配符”后，Word会区分常规引号和智能引号。

（它不会如果您在未启用通配符的情况下使用“搜索和替换”，则无法区分。）

|用这种方式对引号之间的信息进行一些格式化，最好的选择是创建一个可以分配给快捷键或`link：/ wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Quick Access Toolbar]`的宏。也许最简单的方法是简单地使用宏记录器来记录上述步骤。如果愿意，可以使用以下宏进行操作：

Sub BoldBetweenQuotes()

' base for a quotes finding macro     Dim blnSearchAgain As Boolean     ' move to start of doc     Selection.HomeKey Unit:=wdStory      ' start of loop     Do         ' set up find of first of quote pair         With Selection.Find             .ClearFormatting             .Text = Chr(34)

.Replacement.Text = ""

.Forward = True             .Wrap = wdFindStop             .Execute         End With         If Selection.Find.Found Then             Selection.MoveRight Unit:=wdCharacter, Count:=1             ' switch on selection extend mode             Selection.Extend             ' find second quote of this pair             Selection.Find.Execute             If Selection.Find.Found Then                 Selection.MoveLeft Unit:=wdCharacter, Count:=1                 ' make it bold                 Selection.Font.Bold = True                 Selection.Collapse Direction:=wdCollapseEnd                 Selection.MoveRight Unit:=wdCharacter, Count:=1                 blnSearchAgain = True             Else                 blnSearchAgain = False             End If         Else             blnSearchAgain = False         End If     Loop While blnSearchAgain End Sub

注意：

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

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

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（8436）适用于Microsoft Word 2007、2010和2013。您可以在此处找到适用于Word的较早菜单界面的本技巧的版本：

链接：/ word-Automatically_Formatting_Text_within_Quotes [自动格式化引号内的文本]。