Ajustar tamaño y ubicación de Comentarios

Hola, tengo un problema con los comentarios en excel el cual consiste en que cambian de tamaño exageradamente y los ubica muy lejos de la celda donde queda anclado.... Me podrían hacer el favor de colaborarme con este problema pues realmente tengo una gran cantidad de comentarios que para ajustarlos manualmente me daría navidad.....googleando encontré una macro pero no me sirvió. Gracias por el apoyo.

Sub auto_ajustar_comentarios()
'
' auto_ajustar_comentarios Macro
' auto ajusta comentarios
'
' Acceso directo: CTRL+l
'
Application.DisplayCommentIndicator = xlCommentAndIndicator
ActiveCell.Comment.Shape.Select False
With Selection
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlTop
.ReadingOrder = xlContext
.Orientation = xlHorizontal
.AutoSize = False
End With
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub