Selection.ShapeRange.ScaleWidth 1.63, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 1.98, msoFalse, msoScaleFromTopLeft
Any advice on how to update the code for this extra little trick?
When we insert comments in a worksheet, sometimes, we may need to change the default comment formats, if there are a few comments, we can change them manually, but if there are hundreds of comments need to be changed, how do you solve it?
Office Tab: Bring powerful tabs to Office (include Excel), just like Chrome, Safari, Firefox and Internet Explorer. Save you half the time, and reduce thousands of mouse clicks for you. 30-day Unlimited Free Trial
Kutools for Excel: Save 70% of your time and solve 80% Excel problems for you. 300+ advanced features designed for 1500+ work scenario, make Excel much easy and increase productivity immediately.60-day Unlimited Free Trial
With the following VBA code, you can change the font size and the font of the comments in cells, but it can’t change the font colors. please use the following VBA as:
1. Click Developer > Visual Basic, a new Microsoft Visual Basic for applications window will be displayed, click Insert > Module, and then copy and paste the following codes in the module:
Sub FormatAllComments() 'Updateby20140509 Dim xWs As Worksheet Dim xComment As Comment For Each xWs In Application.ActiveWorkbook.Worksheets For Each xComment In xWs.Comments With xComment.Shape.TextFrame.Characters.Font .Name = "Times New Roman" .Size = 14 End With Next Next End Sub
In the above code, you can set the .Name and .Size variables as you would like.
2. Then click button to run the code. And then click Review > Show all comments to view the comments, all of the comment formats in the whole workbook have been changed. See screenshots:
If you want to quickly change other types of format for all comments, you may try to use the Format Comments of Kutools for Excel.
After installing Kutools for Excel, please follow the following steps to change the comment formats:
1. Format one comment with the style that you want to apply to other comments.
2. Click Kutools > More > Format Comments, see screenshot:
3. In the Format Comments dialog box, click Format tab, and choose the scope that you want to change the comment format, you can choose Active sheet or All sheets. Then click Specify the comment cell button to select the cell which contains the specific comment format you want to apply. Then another dialog pops up to tell you the number of cells changed. See screenshot:
4. Then click Ok > Cancel buttons to close the dialog box, and the selected cell comment format has been applied to other comments.
If you don’t want the use the bold font style in all comment cells, please check Force non-bold formatting option.
For more detailed information about Format Comments , please visit Format Comments feature description.