Here it is again:
Set rngOut = rngOut.Offset(0, 1)
Range(rngOut, _
rngOut.End(xlDown).End(xlToRight)).Copy
rngItem.Offset(0, 2).Insert xlShiftDown
it works, but it only shifts the columns down. I want to shift the
entirerow down.
I tried: rngItem.Offset(0, 2).entirerow.Insert xlShiftDown
but it crashed on me. any ideas?? please help!!!
--
Sethaholic
------------------------------------------------------------------------
Sethaholic's Profile:
http://www.excelforum.com/member.php...o&userid=25113
View this thread:
http://www.excelforum.com/showthread...hreadid=393952