Thursday, 13 November 2014

Underline Font

Sub UnderlineFont()

Selection.Font.Underline = xlUnderlineStyleSingle

End Sub

No comments:

Post a Comment