Jacie写道，她已经创建了一个宏，该宏将文本设置为Time New Roman。她想将宏更改为在Times New Roman和Arial Narrow Bold之间切换，并想知道如何实现。

在宏中执行此操作的最简单方法是简单地检查所选文本中使用的字体，然后根据发现的内容采取措施。例如，以下宏仅在所选文本为Times New Roman或Arial Narrow时才起作用：

Sub ChangeSelectedFont()

Select Case Selection.Font.Name         Case "Times New Roman"

Selection.Font.Name = "Arial Narrow"

Selection.Font.Bold = True         Case "Arial Narrow"

Selection.Font.Name = "Times New Roman"

Selection.Font.Bold = False     End Select End Sub

但是，存在另一种非宏观的方法可能会有所道理。

为什么不使用样式？您可以定义样式以包含所需的任何格式设置属性。例如，您可以定义一种使用Times New Roman的样式，另一种使用Arial Narrow Bold。您可以从工具栏随意应用样式，甚至可以使用样式进行搜索和替换。

注意：

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

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

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（1300）适用于Microsoft Word 97、2000、2002和2003。您可以为Word（Word 2007）的功能区界面找到此技巧的版本。和更高版本）在这里：

在宏中切换字体分配。