Hi
try
rng2.Cut Destination:=Worksheets("Exceptions_Report").Range ("A8")


--
Regards
Frank Kabel
Frankfurt, Germany

"Edgar" schrieb im Newsbeitrag
...
Hi

How could i change the following line so that it cuts the
range instead of copying it?

rng2.Copy Destination:=Worksheets
("Exceptions_Report").Range("A8")

TIA