VBA code to define names of cells

[gaudrco]

Hi,

I am trying to design code to create a defined name for a cell based off the value of another cell. The cell that contains the name that I would like to be the defined name is in cell (“C2”). The cell that I would like to obtain the defined name is the cell above the new column create from this code:

Private Sub AddCompetitorButton_Click()

With Sheets("Competitor Overview Data").ListObjects("CompOverviewTable")
    .ListColumns.Add(.ListColumns.Count + 1).Name = Range("C2")
    .ListColumns(.ListColumns.Count - 1).Range.EntireColumn.Copy
    .ListColumns(.ListColumns.Count).Range.EntireColumn.PasteSpecial Paste:=xlPasteFormats

End With
The column headers are competitor names, so I want the cell above the column headers to have the defined name of the competitor name, which comes from cell (“C2”).

What do you think?

 

[Fluff]

Duplicate https://www.mrexcel.com/forum/excel...ther-cells-value-post5330594.html#post5330594

Please do not post the same question multiple times. All clarifications, follow-ups, and bumps should be posted back to the original thread.
Per forum rules, posts of a duplicate nature will be locked or deleted (rule 12 here: Forum Rules).

If you do not receive a response, you can "bump" it by replying to it again, though we advise you to wait 24 hours before doing and not to bump a thread more than once a day.