vba to position comment boxes not working

[cjcass]

Hi,
I have the following vba macro to re-position comment boxes on a worksheet but it's having no effect, would anyone have any ideas as to why that could be?
Many thanks,

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

 

[cjcass]

Ah, there-in lies the problem and that accounts for what I was experiencing when I was playing with other comment box vba when trying to get it to work!!!
Well you've answered the query about the code I was using - many thanks for that
Ultimately I need a solution for changing the position of comments on mouse-over so I'll do some research and if I can't find anything (or a workaround that achieves the same end result) then I may re-post this with a more specific header & content.
Thanks again for your time and support with this

 

[Fluff]

You're welcome & thanks for the feedback.