Saturday 15 November 2014

Adding Trademark

Sub TradeMark()

ActiveCell.FormulaR1C1 = "™"


End Sub

No comments:

Post a Comment