Saturday 15 November 2014

Adding strikethrough effect to the Text

Sub StrikeThrough ()

With ActiveCell.Font

.Strikethrough = True

End With

End Sub

No comments:

Post a Comment