全部显示
应用于 DefaultWebOptions 对象的字体属性。
返回 WebPageFonts 集合，该集合代表将演示文稿存为 Web 页的可用字体组。只读。
expression.Fonts
expression 必选。该表达式返回上述对象之一。
本示例将活动演示文稿的 Times New Roman 字体替换为 Courier 字体。
Application.ActivePresentation.Fonts _
.Replace "Times New Roman", "Courier"本示例将字符集常数 msoCharacterSetEnglishWesternEuropeanOtherLatinScript 所指定的定宽字体默认 Web 页选项设置为“Courier New”、10 磅。
With Application.DefaultWebOptions _
.Fonts(msoCharacterSetEnglishWesternEuropeanOtherLatinScript)
.FixedWidthFont = "Courier New"
.FixedWidthFontSize = 10
End With