Range.Underline Property (Word)
Returns or sets the type of underline applied to a range. Read/write WdUnderline.
Syntax
expression .Underline
expression Required. A variable that represents a Range object.
Example
This example applies a double underline to the fourth word in the active document.
ActiveDocument.Words(4).Underline = wdUnderlineDouble