Deleting/Clearing duplicate range of cells

[Steve]

Below is my data.
If a row range of cells is identical to another, could a macro be written
to find the duplicated rows, and clear those cells ?
As follows:
M3:R3 no duplicate, so keep M3:R3
M4:R4 identical to M5:R5, so delete/clear M5:R5
M6:R6 identical to M7:R7, so delete/clear M7:R7
M8:R8 identical to M9:R9, so delete/clear M9:R9
M10:R10 identical to M11:R11 & M12:R12, so delete/clear M11:R12
There will be no consistency as to what rows would be duplicated and
therefore needing to be cleared, meaning tomorrow it might be row 4 that is a
duplicate to 3, so 4 would need to be cleared; 5, 6, 7 & 8 might be
identical, so 5, 6 & 7 would need to be cleared, etc.

Row M N O P Q R
3 90 100 580 3 9000 2010042
4 90 1000 191 6 9100 2010041
5 90 1000 191 6 9100 2010041
6 90 1000 191 6 9100 2010042
7 90 1000 191 6 9100 2010042
8 90 1000 191 6 9100 2010062
9 90 1000 191 6 9100 2010062
10 90 1000 191 9 9100 2010071
11 90 1000 191 9 9100 2010071
12 90 1000 191 9 9100 2010071

Thank you,

Steve

 

[Steve]

Just delete the duplicated data in M:R.

A:L has data I'll still need.

 

[Steve]

yes, they'll always be next to each other.

 

[Steve]

That is nothing short of amazing. THANK YOU very much.

As you probably ascertained, the end down did go to the last row.

And I'm assuming you won't mind, but I did take the liberty to change the
name of the macro from blah to kudos.

Many thanks gain,

Steve

assuming the the last of the rows involved can be reliably ascertained
from selecting M3 then pressing End, then the down button (you don't
have to do this, it's just the technique the macro uses to identify the
rows involved) then this code should do it. It assumes the correct sheet
is active:

 

[Steve]

Thank you again.

Steve

Good!
On reviewing the code jut now, I notice I left some debugging lines that
really oughtn't to be there, so please remove these:

Rows(i).Select
cll.Select

they'll slow it down.



That is nothing short of amazing. THANK YOU very much.


--
p45cal

*p45cal*
------------------------------------------------------------------------
p45cal's Profile: http://www.thecodecage.com/forumz/member.php?u=558
View this thread: http://www.thecodecage.com/forumz/showthread.php?t=199126

http://www.thecodecage.com/forumz

.