Remover todos os dados, mas não a fórmula no excel 2013

Question

Quero usar algumas planilhas do excel 2013, elas são despesas domésticas anuais, etc. Desejo remover os dados existentes, mas deixar as fórmulas e preferencialmente os textos de cabeçalho da coluna e também deixar os formatos como estão.Pode sugerir se houver é uma maneira rápida de remover os dados antigos, sem precisar reconstruir as planilhas existentes. Isso está no Excel 2013.

    

Answer 1

Isso deve fazer o que você precisa:

Sub kleanUP()
    Dim rng As Range

    Set rng = Range(Cells(2, 1), Cells(Rows.Count, Columns.Count)).SpecialCells(xlCellTypeConstants)

    rng.ClearContents
End Sub

Execute em cada folha que você deseja limpar

    

Answer 2

O Excel não conseguirá distinguir entre constantes que são cabeçalhos e constantes que não são cabeçalhos. Se os cabeçalhos estiverem apenas na linha 1, o código de Gary funcionará, mas se não estiverem, você poderá selecionar todas as células abaixo dos cabeçalhos, clicar em F5, clicar em Especial, marcar "Constantes" e clicar em OK. Em seguida, aperte a tecla Delete no seu teclado.