Underline Property
Applies To
Font object.
Description
Font object: True if the specified text is underlined, False if it's not underlined, or msoTriStateMixed if some characters are underlined and some aren't. Read/write Long.
FontInfo object: True if the font style is underlined. Read-only Long.
Example
This example sets the formatting for the text in shape two on slide one in the active presentation.
With Application.ActivePresentation.Slides(1).Shapes(2)
With .TextFrame.TextRange.Font
.Size = 32
.Name = "Palatino"
.Underline = True
End With
End With