Use this formula in an additional column (C)

C1 =IF(A1=B2,B2,B1)

Drag this formula to the end of the table.

The macro is simple now. Just copy column C and paste values only i
cell B1

--
Fa
-----------------------------------------------------------------------
Faz's Profile: http://www.excelforum.com/member.php...fo&userid=2783
View this thread: http://www.excelforum.com/showthread.php?threadid=47615