最简单的方法是使用宏:

Sub BoldItalics1()

Selection.Font.Bold = True     Selection.Font.Italic = True End Sub

该宏打开属性,但不进行任何切换。换句话说,不能像使用单个的粗体和斜体工具一样,使用相同的宏来关闭粗体斜体。这导致了“下一代”宏,该宏实际上在进行任何更改之前检查以查看所选文本的状态:

Sub BoldItalics2()

With Selection.Font         If .Bold And .Italic Then             .Bold = False             .Italic = False         Else             .Bold = True             .Italic = True         End If     End With End Sub

宏检查是否为选择设置了粗体和斜体属性。如果是这样,那么它将关闭这些属性;否则,将关闭这些属性。如果不是,则将它们设置为True。结果是您的选择将被设置为“完整”的粗体和斜体,或者这些属性将被关闭-您最终不会混合使用这些属性。

注意:

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

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

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(12122)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里: