Named Range Based on Column Header

Hello,

I am looking to automate a process where I can have a named range (entire column) where the name of that range will be the value in Row 1 of that column.

ActiveCell.Columns("A:A").EntireColumn.Select
ActiveWorkbook.Names.Add Name:="Cell A1", RefersToR1C1:= _
"='Sheet1'!C1"

I want "Cell A1" to actually be the value of that cell.

Can anyone help?

Assuming you are only going to be doing this for column 1

Please Login or Register  to view this content.

Thanks for the reply buy I am going to be doing this for 50 columns so I do not want to hard code any cell references. What reference should I use. Thanks!

What 50 columns are you doing this for and are they going to be the same columns every time?

It will be the first 50 columns of the sheet. This range will expand to more columns over time.

As the range expands over time you can adjust it accordingly.

Please Login or Register  to view this content.