Excel - Usare CLEAR senza cancellare la formattazione

[s3ss]

un saluto a tutti.
Qualcuno potrebbe aiutarmi a cancellare i valori delle celle senza però cancellare la formattazione?
Dov'è che sbaglio?

GRAZIE

Codice: Seleziona tutto

Private Sub cmdCLEAR_Click()
ThisWorkbook.Sheets("Book").Range("B6:AT65536").Clear
End Sub

[maxmula]

Anziché il metodo Clear prova ad usare:

Codice: Seleziona tutto

ThisWorkbook.Sheets("Book").Range("B6:AT65536").ClearContents


oppure:

Codice: Seleziona tutto

Sheets("Book").Range("B6:AT65536").formula = ""


Ciao,
MAx

[s3ss]

Velocissimo ed efficiente.

Grazieeee