Thread: [Solved] Remove rows less than 10
View Single Post
 
Old 07-18-2014, 08:42 AM
gbaker gbaker is offline Windows 7 32bit Office 2010 32bit
Competent Performer
 
Join Date: May 2012
Posts: 111
gbaker is on a distinguished road
Default Remove rows less than 10

Hi Joli,
All sheets have to be able to delete any rows that have 10 in the Age column except extended Default and Failed Default Tabs.

I even tried to use conditional formatting Column D2 (cell value between =1 and =10 format fill in Yellow.

Then tried to come up with a syntax like:

Code:
Range("D2:D1076").Select 
Do Until ActiveCell = ""
If ActiveCell.Interior.Color = vbYellow Then
ActiveCell.Rows.Delete
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
Couldn't get that to work either. Let me know if you can get your code to work for me or why the code above won't work.
Thanks in Advance
GBaker
Reply With Quote