XL98: Comments Are Resized Unexpectedly (188508)

CAUSE

This problem may occur when the following conditions are true:

You use the Advanced Filter feature to filter a list in-place, and the list contains comments.

-or-

You have inserted a comment into a cell.

-and-
You increase the size of the row above the row containing the comment.

-and-
You immediately insert a row above the row containing the comment.

WORKAROUND

To work around this problem, use one of the following methods:

Method 1

You can manually resize the comment. To do this, follow these steps:

Right-click the cell that contains the comment, and then click Show Comment on the menu that appears.
Click the border of the comment. Use the resize handles that appear to resize the comment.

Method 2

To resize the comment, use the following Visual Basic code:

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements.

Sub Auto_Size_Comment_Boxes()
    Dim c As Comment
    Dim sht As Worksheet     
       For Each sht In ActiveWorkbook.Sheets
            For Each c In sht.Comments
                c.Visible = True 'To Hide Comment Box Change to False
                c.Shape.Locked = False
                c.Shape.TextFrame.AutoSize = True
            Next c
        Next sht
End Sub

MORE INFORMATION

For additional information, please see the following articles in the Microsoft Knowledge Base:

169053 XL97: Comments May Not Be Printed as Expected

178522 XL98: Comments May Be Obscured by Freeze Panes