Try

ActiveSheet.Range("C5:D11,G5:G11").ClearContents
--
HTH,

Barb Reinhardt



"Gotroots" wrote:

Each cell in the range has data validation - Imput Message
How do I avoid this being deleted also.

Range("C5:D11,G5:G11").Select
Selection.Clear

Thank you if you can help.