The Range class has two functions that you could try using, namely, copy
and pastespecial.
Your code would look similar to this:
rng1.Copy
rng5.PasteSpecial(xlPasteFormulas)
--
C01d
------------------------------------------------------------------------
C01d's Profile:
http://www.excelforum.com/member.php...o&userid=34422
View this thread:
http://www.excelforum.com/showthread...hreadid=548157