Forum Discussion

jal44s's avatar
jal44s
Copper Contributor
Jan 08, 2025

Cell "Notes"

I utilize the "Add Note" function on Cells often throughout a particular document.

I'm having an issue where Excel manipulates the "Note" box, randomly, in several Cells, on multiple Sheets.  When I hover over these manipulated Cells, the Note box will either be unusually long (which is just annoying) or worse, so shrunken that you have to Edit the Note just to stretch open the box to see what the Note is.

It doesn't matter if I change these Cells and save the document.  This occurs randomly, all year, and sometimes reverts the same Cells that I have already changed and saved into the manipulated size.  The Excel is saved as a .xlsx File.

How do I prevent this from happening where I'm wasting so much time trying to adjust my Notes?

  • NikolinoDE's avatar
    NikolinoDE
    Gold Contributor

    Here are several potential solutions and workarounds you can try to prevent Excel from resizing your Note boxes.

     

    Manually Resize and Lock the Note Box

    Edit the Note: Right-click the cell → Select Edit Note.

    Resize the Note box: Drag the edges to your desired size.

    Keep the Note box open and save the workbook before clicking elsewhere.

     

    Convert Notes to Comments (New Format)

    If you don’t mind switching formats.

        Right-click the cell → Select Convert to Threaded Comment.

        Threaded comments do not resize randomly like Notes.

     

    Additional:

    Avoid using multiple monitors:

    Excel sometimes glitches with comment box sizes on multi-monitor setups, especially with different DPI scaling.

     

    Disable Auto-adjust for Comments:

        Go to File → Options → Advanced.

        Scroll to Display section and check Disable Auto-adjustments (if available).

     

    Use VBA if your version of Excel allows it:

    Sub FixNotesSize()
        Dim ws As Worksheet
        Dim cmt As Comment
        For Each ws In ActiveWorkbook.Worksheets
            For Each cmt In ws.Comments
                With cmt.Shape
                    .Width = 150 ' Adjust width as needed
                    .Height = 100 ' Adjust height as needed
                End With
            Next cmt
        Next ws
    End Sub

    Hope this helps

Resources