PDA

View Full Version : If Greater than formula



YellowLabPro
10-27-2006, 12:33 PM
Help changing this section of code:

End With
For r = 2 To LRow2
If Cells(r, "C").Value > 998 Then Cells(r, "A").Value = ""
Next r

End Sub


This line replaces column "A" w/ "", what I need it to do is replace the entire line w/ "" if the value > 998.

Help please?

Thanks,

YLP

mvidas
10-27-2006, 01:24 PM
Yelp!

' If Cells(r, "C").Value > 998 Then Cells(r, "A").Value = ""
If Cells(r, "C").Value > 998 Then Rows(r).ClearContents

Didn't you ask this one before?
Matt

SamT
10-27-2006, 06:56 PM
For r = 2 To LRow2
If Cells(r, "C").Value > 998 Then Range(r:r).ClearContents
Next r