Font.StrikeThrough property (Word)

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

See also

Font Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.