It is working for me

Why do you copy two rows to D1 before you delete Column A:C
WSNew.Range("A1:C2")



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ozzie via OfficeKB.com" <u18021@uwe wrote in message news:5be8a166d0ba9@uwe...
Hi Ron,

No, I need to copy the cells from each sheet, and paste them into D1 before
we delete columns A:C

WSNew.Range("A1:C2").Copy WSNew.Range("D1")

I tried adding the paste function by the line of code above, but can't seem
to do it?

Thanks for your help,



Ron de Bruin wrote:
Hi Ozzie

Do you want to copy the cells from ws1 to the sheets?

Morning Ron

[quoted text clipped - 17 lines]

David

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200602/1