VBA return header as text using column reference

[HeadAgainstABrickWall]

Hi all, trying to run a basic VBA equivalent of:

=[Column header]

As part of loop. I'm adding a column; naming the column based on the previous column name; and then want to set the formula for these to equal the column header as text.

I currently have:

Cells(2, colx) = "=" & Cells(1, colx)

Which is functioning, but it's returning "=@[Column header]".

I'm trying to do this to be able to declare formulae as named objects and call them based on the column header name.

Any help appreciated.

 

[HeadAgainstABrickWall]

Sorry, this is working fine once the declared object names are set up, no issues!!