Comments disappeared
 

Several of my comments seem to be broken. When I mouse over them, it only
shows the arrow with a line going to nothing. When I click 'edit comment'
nothing happens. It is not hidden, and it does not show up when I set the
sheet to show all comments. I know it is still there, because when I mouse
over it, it says "Comments by Frank". Any ideas on what happened, or how to
fix it?

Comments disappeared
 

I am afraid the comments might have been removed,; I guess in this case by
accident. Only choice here, you have to do it all over again.

Argy

"Nightshade" wrote:

Several of my comments seem to be broken. When I mouse over them, it only
shows the arrow with a line going to nothing. When I click 'edit comment'
nothing happens. It is not hidden, and it does not show up when I set the
sheet to show all comments. I know it is still there, because when I mouse
over it, it says "Comments by Frank". Any ideas on what happened, or how to
fix it?

Comments disappeared
 

Running this small macro will adjust your comments. At least then you will
be able to re-size them, re-position them and edit them:

Sub FixComments()
Dim r As Range, c As Comment
For Each c In ActiveSheet.Comments
Set r = Range(c.Parent.Address)
topp = r.Offset(1, 1).Top
leftt = r.Offset(1, 1).Left
With r
.Comment.Visible = True
.Comment.Shape.Select
Selection.ShapeRange.Top = topp
Selection.ShapeRange.Left = leftt
Selection.ShapeRange.Width = 50
Selection.ShapeRange.Height = 50
End With
Next
End Sub
--
Gary''s Student - gsnu200813


"Nightshade" wrote:

Several of my comments seem to be broken. When I mouse over them, it only
shows the arrow with a line going to nothing. When I click 'edit comment'
nothing happens. It is not hidden, and it does not show up when I set the
sheet to show all comments. I know it is still there, because when I mouse
over it, it says "Comments by Frank". Any ideas on what happened, or how to
fix it?