Issue with Insert comments

[senthilkumar_rm]

Dear Solvers,


I have a huge amount of data in an Excel sheet , Where almost all the cells have insert comments

Problem encountered is that , Some of Insert comments are showing only the arrow mark not the inside comment , When i right clicked and showed comment it is showing somewhere else with shrinked auto shape

Can any one help on this issue ??


Ps : I cannot share the data as file size is GB

 

[Debraj]

Hi Senthil,

[pre]

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

[/pre]

Please run the above code, hope it will resolve your Problem

Please let us know if it works.. In the meanwhile, I am trying to solve issue of the Comment Box size.. (shrink-ed auto shape)


Regards,

Deb