Simple VBA - How to select & copy out of order columns to a different sheet

[LNG2013]

I have a WB that has 200 columns, I want to select specific columns that are spaced out from each other, and paste them into a new worksheet.
I keep geting debug errors with the copy part highlighted. Any idea what I am doing wrong?

Sub ColumnsSelect()
'
Sheets("Objective5m").Select
    Range( _
        "I:I,L:L,N:N,P:P,Q:Q,R:R,T1,T:T,V:V,AA:AA,AF:AF,AI:AI,AJ:AJ,AK:AK,AL:AL,AM:AM,AN:AN,BP:BP,BR:BR,BW:BW,BU:BU,BX:BX,BY:BY,BZ:BZ,CA:CA,CB:CB,CC:CC" _
        ).Select
    Application.CutCopyMode = False
    [COLOR=red]Selection.Copy
[/COLOR]    Sheets("Sheet3").Select
    ActiveSheet.Paste
    
    
    
End Sub

 

[c23lemon]

Hi LNG2013,

I see you have T1,T:T. I guess that is a mistype? Remove that and it should work fine.

Regards,

 

[LNG2013]

Dude you so rock! Also to note I had another error when it was performing the paste but that was because the sheet was selected but no cell area was.... Cells.Select


Finished code

Sub DataSelect()
'
' '
Sheets("Sheet1").Select
    Range( _
        "I:I,L:L,N:N,P:P,Q:Q,R:R,T:T,V:V,AA:AA,AF:AF,AI:AI,AJ:AJ,AK:AK,AL:AL,AM:AM,AN:AN,BP:BP,BR:BR,BW:BW,BU:BU,BX:BX,BY:BY,BZ:BZ,CA:CA,CB:CB,CC:CC" _
        ).Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Sheet2").Select
    Cells.Select
    ActiveSheet.Paste
    
End Sub