Como eu sei o que há na célula para que eu possa limpar todas elas ao mesmo tempo?

Question

Eu tenho uma planilha que eu baixei de outro SIS. Eu estou tentando usar a função COUNTA . Está mostrando que todas as células têm algo nelas, embora nada apareça na célula. Posso filtrar e limpar o conteúdo, mas isso consome tempo devido ao número de colunas. Como eu sei o que há na célula para que eu possa limpar todas elas ao mesmo tempo?

    

Answer 1

Para limpar seus pseudo-vazios, execute esta macro curta:

Sub ClearPseudoEmpties()
    Dim r As Range

    For Each r In ActiveSheet.UsedRange
        If r.Value = "" And Application.WorksheetFunction.CountA(r) <> 0 Then
            r.ClearContents
        End If
    Next r
End Sub