Change font on all cell comments

This is a simple code that is very useful if you want to change the font size on all comments that you have on your Excel sheet.

Sub ChangeCommentsFont()
    Dim cmt As Comment
    For Each cmt In ActiveSheet.Comments
        With cmt.Shape.TextFrame.Characters.Font
            .Size = 11
        End With
    Next cmt
End Sub

You can change this code for setting a new font name, font color, etc.

5 comentários:

lyssa said...

It is very simple , i will try in my documents.

Buy Fonts

VMS said...

In Excel 2010 it is easier than this! Highlight your comment, right click, select Format comment - and this will take you to all formatting options.....

Vicky Ram said...

Great post! This is very useful for me and gain more information, Thanks for sharing with us.

Guest posting sites

harrymosan said...

If you want a secure solution for managing your business transactions you can setup quickbooks accounting program. Along with all this you can use it for paying bills, conduct reports, tax filing, customer invoice etc. You can make contact to Quickbooks tech support if you find any error.

peter said...

if you are using McAfee activate and looking for product key then you can visit our website where you will get the full information related to it. if you are facing any kind of error while using then you can visit our website and share your problem with our technical assistant. and if you not installed any antivirus in your system then install it now. it provides maximum protection to your data from thread and viruses.