Word VBA教程:Font属性

返回或设置Font对象,该对象代表指定对象的字符格式。如要设置本属性,就要指定一个返回 Font对象的表达式。Font 类型,可读写。

VBA示例

本示例将取消活动文档的“标题 1”样式中的加粗格式。


ActiveDocument.Styles(wdStyleHeading1).Font.Bold = False

本示例切换活动文档中第二段的 Arial 和 Times New Roman 字体。


Set myRange = ActiveDocument.Paragraphs(2).Range
If myRange.Font.Name = "Times New Roman" Then
    myRange.Font.Name = "Arial"
Else
    myRange.Font.Name = "Times New Roman"
End If

本示例显示选定文本的字体。


MsgBox Selection.Font.Name

本示例将选定文本的字符格式应用于活动文档的第一段。


Set myFont = Selection.Font.Duplicate
ActiveDocument.Paragraphs(1).Range.Font = myFont

本示例查找下一处 Times New Roman 字体格式的文本。


With Selection.Find
    .ClearFormatting
    .Font.Name = "Times New Roman"
    .Execute FindText:="", ReplaceWith:="", Format:=True, _
        Forward:=True
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号