I think one of your counters is wrogn.

lngLastRow2 = lngLastRow2 + 1


It looks like you are trying to put a space between each row in the
detination which would mean you would need this

lngLastRow2 = lngLastRow2 + 2


--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=170347

Microsoft Office Help