KB188507 - XL97: Comments Are Resized Unexpectedly

Article ID: 188507

Article Last Modified on 11/23/2006

Microsoft Excel 97 Standard Edition

This article was previously published under Q188507

SYMPTOMS

A comment in a worksheet cell may be resized unexpectedly, so that the comment box object is only slightly visible when you rest the mouse pointer over the comment marker.

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 insert 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 sample code:

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals 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 needs. If you have limited programming experience, you may want to contact a Microsoft Certified Partner or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Partners, please visit the following Microsoft Web site:

https://partner.microsoft.com/global/30000104

For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:

http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS


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

STATUS

Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article.

MORE INFORMATION

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

169053 XL97: Comments May Not Be Printed as Expected

173347 XL97: Comments May Be Obscured by Freeze Panes

REFERENCES

For more information about comments, click the Index tab in Microsoft Excel Help, type the following text

Comments

and then double-click the selected text to go to the "displaying" topic.

Additional query words: XL97

Keywords: kbbug kbpending KB188507