Emboss Property Example

This example embosses the second sentence in a new document.

With Documents.Add.Content
    .InsertAfter "This is the first sentence. "
    .InsertAfter "This is the second sentence. "
    .Sentences(2).Font.Emboss = True
End With

This example embosses the selected text.

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