Autoname a range
 

Thanks in advance.

Is it possible to automate the naming of a range, say of a table, as say the
intersection of the row and column headers?

Autoname a range
 

Hi
Try this

ActiveWorkbook.Names.Add Name:=Selection.Cells(1, 1).Text,
RefersTo:=Selection.Address

The row and column headers are assumed to be in the first row and
column (the Cells(1,1) bit). You can replace Selection with a range
object if you require.

regards
Paul

On Sep 23, 7:25*am, CLB wrote:
Thanks in advance.

Is it possible to automate the naming of a range, say of a table, as say the
intersection of the row and column headers?

Autoname a range
 

Assume the variable rng points at the table

rng.Name = rng.Cells(1,1,).value

--
__________________________________
HTH

Bob

"CLB" wrote in message
...
Thanks in advance.

Is it possible to automate the naming of a range, say of a table, as say
the
intersection of the row and column headers?