Hi
You probably don't need to get the column reference, as there are easy ways to find the position once you have made a selection.
Bit hard without an example file to know your structure, but if you have a range called mths then the code below may help
Dim arr As Variant
arr = Range("mths")
ActiveSheet.ListBox1.List = WorksheetFunction.Transpose(arr)
If you need more guidance, then build an example file, put it up onto the post, and you will probably get more detailed code to suit your situation.
HTH
rylo
Bookmarks