Range("A1:D500").SpecialCells(xlCellTypeConstants, 23).ClearContents

Explore more on possibilities using the Edit Goto Special menu while
recording macros.

HTH. best wishes Harald

"Caroline Vincent" skrev i melding
...
Does anyone know how to clear the content of a range
without deleting the formulae?
Range(XXX).clear or Range(XXX).clearcontents delete the
formulae as well.
Thanks