Inserted Cell Comments box out of whack. How to align.

[MikeyZ]

Many times we insert comments to a cell for whatever reason.
So often for me when I go to edit the comments the text box is somewhere else on the spreadsheet.
Is there a quick way of getting it to align itself with the targeted cell without having to click and drag it back into place?
Are there settings I need to check maybe?

Mike

 

[igold]

Hi Mike,

How about this:

Sub ResetComments()
    Dim cmt As Comment
    For Each cmt In ActiveSheet.Comments
        cmt.Shape.Top = cmt.Parent.Top + 5
        cmt.Shape.Left = _
        cmt.Parent.Offset(0, 1).Left + 5
    Next
End Sub

Credit for code goes here:

http://www.contextures.com/xlcomments03.html#Reset

HTH

igold