Font.Engrave Property (Word)
True if the font is formatted as engraved. Read/write Long.
Syntax
expression .Engrave
expression A variable that represents a Font object.
Remarks
Returns True, False or wdUndefined (a mixture of True and False). Can be set to True, False, or wdToggle. Setting Engrave to True sets Emboss to False, and vice versa.
Example
This example formats the first letter in the active document as engraved.
Dim rngTemp As Range
Set rngTemp = ActiveDocument.Characters(1)
With rngTemp.Font
.Size = 20
.Engrave = True
End With
This example formats the selection as engraved.
If Selection.Type = wdSelectionNormal Then
Selection.Font.Engrave = True
Else
MsgBox "You need to select some text."
End If