Outline Property Example

This example applies outline font formatting to the first three words in the active document.

Set myRange = ActiveDocument.Range(Start:= _
    ActiveDocument.Words(1).Start, _
    End:=ActiveDocument.Words(3).End)
myRange.Font.Outline = True

This example toggles outline formatting for the selected text.

Selection.Font.Outline = wdToggle

This example removes outline font formatting from the selection if outline formatting is partially applied to the selection.

Set myFont = Selection.Font
If myFont.Outline = wdUndefined Then
    myFont.Outline = False
End If