thank you for your reply. m getting debug error on the following line

Do While Not Cells(iIndex, 2) = Empt

--
ceem
-----------------------------------------------------------------------
ceemo's Profile: http://www.excelforum.com/member.php...fo&userid=1065
View this thread: http://www.excelforum.com/showthread.php?threadid=38993