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.

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.

Use Clearcontents instead of Clear.  Clear will remove formating while
clearcontents will only remove text/numbers.


-- 
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread: http://www.thecodecage.com/forumz/showthread.php?t=167403

[url="http://www.thecodecage.com"]Microsoft Office Help[/url]

Sub qwerrty()
Range("A1").ClearContents
End Sub

-- 
Gary''s Student - gsnu200909


"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.