VBA – ClearFormats – Remover Formatação Para Cada Célula no Intervalo

Este tutorial demonstrará como limpar a formatação de uma célula ou de um intervalo inteiro de células.

Você pode limpar a formatação da célula usando o método ClearFormats do objeto Range.

Observação: se você quiser limpar tudo sobre a célula, use .Clear

Limpar Formatos de um Intervalo de Células

Isso limpará a formatação das células do intervalo A1:C1

Sub LimparFormatos()
 Range("A1:C1").ClearFormats
End Sub

Se você quiser limpar a formatação de uma planilha inteira, use o objeto Cells

Sub LimparFormatosPlanilha()
 Cells.ClearFormats
End Sub

Se você estiver trabalhando com um intervalo extremamente grande em uma pasta de trabalho grande, o Excel poderá congelar. Você também pode percorrer cada célula para evitar que o Excel congele.

Fazer um Loop pelas Células e Limpar Formatos

O exemplo a seguir eliminará a formatação de cada célula em um intervalo usando um loop.

Public Sub RemoverFormatacao()
Dim c As Range
For Each c In Range("A:A")
     c.ClearFormats
Next c
End Sub