Saberexcel - site das macros Microsoft Excel VBA Essa macros do Aplicativo Microsoft Excel VBA, mostram e ou ocultam todos os comentários existentes na folha de planilha
Sub mostrar_todos_comentarios() On Error Resume Next saber1.Shapes("sb1").Visible = True saber1.Shapes("sb").Visible = False
Dim sb As Comment For Each sb In ActiveSheet.Comments sb.Visible = True Next sb
End Sub
'Essa macro do Aplicativo Microsoft Excel VBA oculta todos os comentários existentes na planilha Sub ocultar_todos_comentarios() On Error Resume Next saber1.Shapes("sb1").Visible = False saber1.Shapes("sb").Visible = True
Dim sb As Comment For Each sb In ActiveSheet.Comments sb.Visible = False Next sb
End Sub
Aprenda Microsoft Excel VBA(Visual Basic Application) com qualidade SaberExcel

|