Copying columns

[Gemz]

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,AM:AM,AP:AP,AS:AS,AU:AU,AQ:AQ").Copy
Destination:= _
NewbkS2.Range("A1")
End With

thanks.

 

[Nigel]

Try this.....

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

 

[Gemz]

Hi,

It just highlights this line and reports error:

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


thanks.

 

[Nigel]

Use this to copy the non-contiguous ranges

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



--

Regards,
Nigel
(e-mail address removed)

 

[Nigel]

Use

..Range not .Columns

--

Regards,
Nigel
(e-mail address removed)

 

[Gemz]

Hi,

It copies the range now but the problem is that it copies the stuff and then
puts it in order! i.e. puts the columns in sequential order but i want them
in the order i have put them in the code (no sequential order because thats
how i want to see the info.)

Is there a way around this? or do the columns have to be in order?

thanks.