Use this to copy the non-contiguous ranges

.Range("H:H,T:T,AK:AK,G:G,AJ:AJ,D:D,AM:AM,AP:AP,AS :AS,AU:AU,AQ:AQ").Copy



--

Regards,
Nigel




"Gemz" wrote in message
...
Hi,

It just highlights this line and reports error:


.Columns("H:H,T:T,AK:AK,G:G,AJ:AJ,D:D,AM:AM,AP:AP, AS:AS,AU:AU,AQ:AQ").Copy


thanks.

"Nigel" wrote:

Try this.....

With oldbk.Sheets(2)

.Columns("H:H,T:T,AK:AK,G:G,AJ:AJ,D:D,AM:AM,AP:AP, AS:AS,AU:AU,AQ:AQ").Copy
.Paste Destination:= NewbkS2.Range("A1")
End With

--

Regards,
Nigel




"Gemz" wrote in message
...
Hi,

By mistake i posted this in the excel worksheet functions post first,
please
ignore that. This is the better place to post my problem..

I have the following sample code, this bit of my code creates error. I
would
like to copy across the columns in that order please. what is making it
go
wrong?

With oldbk.Sheets(2)

.Columns("H:H,T:T,AK:AK,G:G,AJ:AJ,D:D,AM:AM,AP:AP, AS:AS,AU:AU,AQ:AQ").Copy
Destination:= _
NewbkS2.Range("A1")
End With

thanks.