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