Deleting duplicates and printing issue

[Whitebull]

Hi All,
I need help, and even my shrink agrees with me.

I am not experienced with excel but my issue is with KARAOKE LISTS
with 13k entries, so the old delete and paste would take some time.
Currently I have the list as below

Artist Song

ABBA Dancing Queen
ABBA Dancing Queen
ABBA Knowing Me Knowing You
ABBA Waterloo
ABBA Waterloo
Adamski Killer

ETC

What I want is to delete all the duplicate entires and Make the page
print 2 Artist and two song titles in Alpabetical order. Starting wit
artist aaaaaa
down to the bottom of the page then picking at the top of the sam
page. As follows
(a) (b)
(c) (d)
ABBA Dancing Queen DOORS Lit
My Fire
ABBA knowing me knowing you DOORS Roadhous
Blues
ETC ETC DOORS
House of rising Sun
ETC ETC ET
ETC
ETC ETC ET
ETC
ETC ETC ET
ETC
TO BOTTOM OF PAGE

Can't stand the thought of doing it manually

Thanks in advance

Damia

 

[Max]

... but my issue is with KARAOKE LISTS
with 13k entries, so the old delete and paste would take some time.
Currently I have the list as below

Artist Song
ABBA Dancing Queen
ABBA Dancing Queen
ABBA Knowing Me Knowing You
ABBA Waterloo
ABBA Waterloo
Adamski Killer

ETC

What I want is to delete all the duplicate entries ..

Here's something to play around with for the Q above

Assume your source list is in Sheet1, cols A and B,
data in row2 down

Put in say, D1:
=IF(SUMPRODUCT(($A1:A$2=A1)*($B1:B$2=B1))>1,"",ROW())

Copy D1 down as many rows as data is expected in cols A and B,
e.g.: down to D15000?

In a new Sheet2
-----------------------
Put in A1:

=IF(ISERROR(MATCH(SMALL(Sheet1!$D:$D,ROW(A1)),Sheet1!$D:$D,0)),"",OFFSET(She
et1!$A$1,MATCH(SMALL(Sheet1!$D:$D,ROW(A1)),Sheet1!$D:$D,0)-1,COLUMN(A1)-1))

Copy across to B1,
fill down by as many rows as was done in Sheet1's col D
viz.: down to B15000

Cols A and B will return only the unique items from
Sheet1's cols A and B

Just do a copy of the list in Sheet2
and a paste special as values elsewhere to freeze

 

[Max]

Put in say, D1:

=IF(SUMPRODUCT(($A1:A$2=A1)*($B1:B$2=B1))>1,"",ROW())

Sorry, error in the above, pl replace the formula with

Put in D1:
=IF(A1="","",IF(SUMPRODUCT(($A$1:A1=A1)*($B$1:B1=B1))>1,"",ROW()))