Detalhes de vba comentario posicionando todos comentarios na panilha

Macros do Aplicativo Microsoft Excel VBA, reposicionam todos os comentários na folha de planilha.
Saberexcel - o site das macros

Sub Reposisionando_todos_comentarios_planilha()
On Error Resume Next
Dim Sb As Comment
For Each Sb In ActiveSheet.Comments
Sb.Shape.Top = Sb.Parent.Top + 5
Sb.Shape.Left = Sb.Parent.Offset(0, 1).Left + 5
Next
End Sub

Sub Reposisionando_todos_comentarios_planilha_II()
On Error Resume Next
Dim Sb As Comment
For Each Sb In ActiveSheet.Comments
Sb.Shape.Top = Sb.Parent.Top + 60
Sb.Shape.Left = Sb.Parent.Offset(0, 1).Left + 15
Next
End Sub


Sub Reposisionando_todos_comentarios_planilha_III()
On Error Resume Next
Dim Sb As Comment
For Each Sb In ActiveSheet.Comments
Sb.Shape.Top = Sb.Parent.Top - 15
Sb.Shape.Left = Sb.Parent.Offset(0, 1).Left + 20
Next
End Sub


Aprenda Microsoft Excel VBA com qualidade Saberexcel