Comment position

T

Tomek

In a large spreadsheet I have my comments moved many columns away and the
comment windows also look squized (probably comes from grouping and
ungrouping). Does any one know how to make them fixed?

Thanks,
Tomek
 
K

Ken Wright

Run the following previously posted by William and it will reset them:-

Sub RewriteComments()
Application.ScreenUpdating = False
Dim c As Range, s As String, r As Range
Set r = ActiveSheet.UsedRange.SpecialCells(xlCellTypeComments)
For Each c In r
s = c.NoteText
c.ClearComments
c.NoteText s
c.Comment.Visible = False
c.Comment.Shape.TextFrame.AutoSize = True
Next c
Application.ScreenUpdating = True
End Sub
 
Top