本示例将活动文档中的字体和字号分别改为“隶书” 和 “20”磅。
With ActiveDocument.Content.Font
.Name = "隶书"
.Size = 20
End With