constant that indicates the type of underline for the selected characters in the specified font in a text range. Read/write.
| PbUnderlineType can be one of these PbUnderlineType constants. |
| pbUnderlineDash |
| pbUnderlineDashHeavy |
| pbUnderlineDashLong |
| pbUnderlineDashLongHeavy |
| pbUnderlineDotDash |
| pbUnderlineDotDashHeavy |
| pbUnderlineDotDotDash |
| pbUnderlineDotDotDashHeavy |
| pbUnderlineDotHeavy |
| pbUnderlineDotted |
| pbUnderlineDouble |
| pbUnderlineMixed |
| pbUnderlineNone |
| pbUnderlineSingle |
| pbUnderlineThick |
| pbUnderlineWavy |
| pbUnderlineWavyDouble |
| pbUnderlineWavyHeavy |
| pbUnderlineWordsOnly |
expression.Underline
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example formats the characters of the first story with a dashed and heavy underline.
Sub DashHeavy()
Application.ActiveDocument.Stories(1).TextRange _
.Font.Underline = pbUnderlineDashHeavy
End Sub