Delete Entire Row If Q
I am trying to find some code that will delete an entire row if certain
properties exist. I require to do this from the last populated row in my
worksheet up to row 1, as my entire worksheet is dynamic
An example of my layout is as shown below (I do not have a header row). I
have aleady sorted my range in A (ascending); then B (ascending); then Q
(descending)
3047 12/12/05 ?8,500
3047 12/12/05 ?8,500
3047 12/12/05 ?8,500
3047 13/12/05 ?8,700
3047 13/12/05 ?8,700
3047 13/12/05 ?8,700
3047 14/12/05 ?12,300
3047 14/12/05 ?12,300
3047 14/12/05 ?12,300
As you can see I have several rows with the same dates, but only one date of
each is relevant in that it is the most up todate figure, which is all that
I require. I have a TimeStamp in Column Q which I have not shown above. The
logic of what I am trying to express in code is as follows
Delete the row if : A(Row number) = A(Row number-1) AND B(Row number) =
B(Row Number -1) AND Q(Row number) < Q(Row Number -1)
Otherwise
Move up to the Next Row until you reach Row A
|