LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ayo Ayo is offline
external usenet poster
 
Posts: 489
Default 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
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
vb code help needed Phil Excel Programming 4 January 10th 07 04:21 AM
Help Please - last bit of code needed Mark Dullingham Excel Programming 4 May 6th 06 12:33 AM
Fixing VBA code to better suit concatenating needs!! Sandwiches2 Excel Programming 1 March 15th 06 02:32 AM
fixing code timmy64 - ExcelForums.com Excel Programming 2 July 4th 05 09:48 AM


All times are GMT +1. The time now is 12:54 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"