Cells(1, WorksheetFunction.Match("STOCK CODE", Rows("1:1"),
0)).EntireColumn.Insert
Cells(1, WorksheetFunction.Match("STOCK CODE", Rows("1:1"), 0) - 1).Select
--
Regards.
Daniel
"pol" a écrit dans le message de news:
...
I created a new column using the following formula

Cells(1, WorksheetFunction.Match("STOCK CODE", Rows("1:1"),
0)).EntireColumn.Insert

But I to goto to first cell of that new column which are created newly
with
the above formula

Please help
Pol