Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Help Needed Fixing Code !!!!!!!!!!
I need someone to take a look at this code for me and telling me what I am
doing wrong. What I am trying to do is delete any row where this condition is true: c.Offset(0, 2) < "Completed" And c.Offset(0, 3) < "Completed" And _ c.Offset(0, 4) < "Completed" And c.Offset(0, 5) < "Completed" In other words, if the values in these cells are anything but complete, delete the entire row. For Each c In Worksheets("Ready for DDS").Range("B2:B" & SL_lRow).Cells If c.Offset(0, 2) < "Completed" And c.Offset(0, 3) < "Completed" And _ c.Offset(0, 4) < "Completed" And c.Offset(0, 5) < "Completed" Then If rngAll Is Nothing Then Set rngAll = c Else Set rngAll = Union(rngAll, c) End If End If Next c If Not rngAll Is Nothing Then rngAll.EntireRow.Delete |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
vb code help needed | Excel Programming | |||
Help Please - last bit of code needed | Excel Programming | |||
Fixing VBA code to better suit concatenating needs!! | Excel Programming | |||
fixing code | Excel Programming |