In another part of your spreadsheet, say H1, enter

=A1

In H2

=IF(ISERROR(MATCH(0,COUNTIF(H$1:H1,$A$1:$A$20&""), 0)),"",
INDEX(IF(ISBLANK($A$1:$A$20),"",$A$1:$A$20),MATCH( 0,COUNTIF(H$1:H1,$A$1:$A$2
0&""),0)))

which is an array formula, it should be committed with Ctrl-Shift-Enter, not
just Enter.

Copy H2 down as far as you need, leave some spare for new values, they will
initially show as blank

in I1 enter

=IF(H1="","",SUMIF($A$1:$A$10,H1,$B$1:$B$10))

and copy that down

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Ananth" wrote in message
...
I have a list of cars in Stockyards A1,A2, A3
Col A - Make, Col B Qty in Nos, Col C - Stockyard

Honda 2 A1
Toyota 1 A1
Land Rover 3 A2
Ford 6 A2
BMW 2 A3
Mercedes 1 A2
Honda 2 A3
BMW 1 A3
Ford 5 A2
Toyota 3 A1

Using VBA I would like to see a summary of Cars Stock, that should look as
under :

BMW 3
Ford 11
Honda 4
Land Rover 3
Mercedes 1
Toyota 4
Grand Total 26

Any help will be greatly appreciated. I would extend the logic for 25
Models
of cars
spread across 120 Stock yards.