Comment position

  • Thread starter Thread starter Tomek
  • Start date Start date
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
 
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
 
Back
Top