the best way is to go from the end of the sheet back to the beginning
like this
Lastrow = Range("A" & rows.count).end(xlup).row
for rowcount = Lastrow to 1 step -2
Rows(RowCount).insert
next rowCount
--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread:
http://www.thecodecage.com/forumz/sh...d.php?t=185766
Excel Live Chat