Engrave 属性

       

如果该属性值为 True,则将字体的格式设置为阴文。该属性返回值为 TrueFalse wdUndefined(当返回值既可为 True 也可为 False 时取该值)。该属性值可设置为 TrueFalse wdToggleLong 类型,可读写。

说明

如果将 Engrave 属性设置为 True,则 Emboss 的属性将设置为 False。反之亦然。

示例

本示例将活动文档中的第一个字母的格式设置为阴文。

Dim rngTemp As Range

Set rngTemp = ActiveDocument.Characters(1)
With rngTemp.Font
    .Size = 20
    .Engrave = True
End With

本示例将所选内容的格式设置为阴文。

If Selection.Type = wdSelectionNormal Then
    Selection.Font.Engrave = True
Else
    MsgBox "You need to select some text."
End If