Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
True if the font is formatted as strikethrough text. Read/write Long.
Syntax
expression .StrikeThrough
expression An expression that returns a Font object.
Remarks
The StrikeThrough property returns True, False or wdUndefined (a mixture of True and False). Can be set to True, False, or wdToggle.
To set or return double strikethrough formatting, use the DoubleStrikeThrough property.
Example
This example applies strikethrough formatting to the first three words in the active document.
Set myDoc = ActiveDocument
Set myRange = myDoc.Range(Start:=myDoc.Words(1).Start, _
End:=myDoc.Words(3).End)
myRange.Font.StrikeThrough = True
This example applies strikethrough formatting to the selected text.
If Selection.Type = wdSelectionNormal Then
Selection.Font.StrikeThrough = True
Else
MsgBox "You need to select some text."
End If