Non-continuous range to column

[Packofsnakes]

Hello,
Can someone help me with creating a macro which turns a non-continuous range to a column? I have figured out how to select it I just need to copy it to a single column on a different sheet.
Thank you

 

[Joe4]

Welcome to the Board!

Your question is a bit generic.
Can you please provide us with an actual example of exactly what you want to do?

MrExcel has a tool called “XL2BB” that lets you post samples of your data that will allow us to copy/paste it to our Excel spreadsheets, so we can work with the same copy of data that you are. Instructions on using this tool can be found here: XL2BB Add-in

Note that there is also a "Test Here” forum on this board. This is a place where you can test using this tool (or any other posting techniques that you want to test) before trying to use those tools in your actual posts.

 

[Packofsnakes]

Welcome to the Board!

Your question is a bit generic.
Can you please provide us with an actual example of exactly what you want to do?

MrExcel has a tool called “XL2BB” that lets you post samples of your data that will allow us to copy/paste it to our Excel spreadsheets, so we can work with the same copy of data that you are. Instructions on using this tool can be found here: XL2BB Add-in

Note that there is also a "Test Here” forum on this board. This is a place where you can test using this tool (or any other posting techniques that you want to test) before trying to use those tools in your actual post

Welcome to the Board!

Your question is a bit generic.
Can you please provide us with an actual example of exactly what you want to do?

MrExcel has a tool called “XL2BB” that lets you post samples of your data that will allow us to copy/paste it to our Excel spreadsheets, so we can work with the same copy of data that you are. Instructions on using this tool can be found here: XL2BB Add-in

Note that there is also a "Test Here” forum on this board. This is a place where you can test using this tool (or any other posting techniques that you want to test) before trying to use those tools in your actual posts.

ok, so I have lists of names like below that I need to combine to a single column on sheet two to track who is working

 

[Joe4]

So, do you just want columns B, I, and P combined in a list, or the related columns too?
Where do you want them combined?

 

[JGordon11]

This will write the selected data to column W starting at W1. If you want it to go in a different column change the hardwired 23 to another column number. I suggest working on a copy of your spreadsheet until you're satisfied it works as you would like.

Sub CopyToColumn()
    For Each c In Selection
        k = k + 1
        Cells(k, 23) = c.Value
    Next
End Sub

 

[Packofsnakes]

So, do you just want columns B, I, and P combined in a list, or the related columns too?
Where do you want them combined?

Just b, I, and P. And I want them copied to column a on sheet 2.
thank you

 

[Rick Rothstein]

Give this macro a try...

Sub NamesColumnBJP()
  With Sheets("Sheet1")
    .Range("B3", .Cells(Rows.Count, "B").End(xlUp)).Copy Sheets("Sheet2").Range("A1")
    .Range("J3", .Cells(Rows.Count, "J").End(xlUp)).Copy Sheets("Sheet2").Cells(Rows.Count, "A").End(xlUp).Offset(1)
    .Range("P3", .Cells(Rows.Count, "P").End(xlUp)).Copy Sheets("Sheet2").Cells(Rows.Count, "A").End(xlUp).Offset(1)
  End With
End Sub