Macro Excel: cancellare il contenuto di una colonna tranne l'ultima cella

    'delete all the cells (but not the last one) of the K column
    Range("K3", Range("K65536").End(xlUp).Offset(-1, 0)).Select
    Selection.ClearContents

Questo codice trova il range di celle della colonna K, escludendo la cella piu in basso (che di solito contiene una foruma per calcolare il totale) e cancella i dati contenute in esse.