ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Syntax - Add Range Name based on Selection (https://www.excelbanter.com/excel-programming/273971-syntax-add-range-name-based-selection.html)

Bruce Roberson

Syntax - Add Range Name based on Selection
 
What is the proper syntax for adding the name "Area1" in
this case, based on a selection of the active cell,
xldown. I recorded it but of course it recorded actual
R1C1 of the range at the time. That doesn't work since the
range will vary in size each time it is run.

So, I need to go something like this.

ActiveWorkbook.Names.Add Name:="AREA1" _
Range.(Selection, Selection.End(xlDown))

Thanks,


Bruce

Tom Ogilvy

Syntax - Add Range Name based on Selection
 
Range(Selection, Selection.End(xlDown)).Name = "AREA1"

--
Regards,
Tom Ogilvy

"Bruce Roberson" wrote in message
...
What is the proper syntax for adding the name "Area1" in
this case, based on a selection of the active cell,
xldown. I recorded it but of course it recorded actual
R1C1 of the range at the time. That doesn't work since the
range will vary in size each time it is run.

So, I need to go something like this.

ActiveWorkbook.Names.Add Name:="AREA1" _
Range.(Selection, Selection.End(xlDown))

Thanks,


Bruce




Bruce Roberson

Syntax - Add Range Name based on Selection
 
Looks like I tried to make it harder than it was. I
actually kept fiddling with the syntax till I got it to
work, but I definitely like your way much better. So I
made that change.

Thanks,


Bruce Roberson
-----Original Message-----
Range(Selection, Selection.End(xlDown)).Name = "AREA1"

--
Regards,
Tom Ogilvy

"Bruce Roberson" wrote in

message
...
What is the proper syntax for adding the name "Area1" in
this case, based on a selection of the active cell,
xldown. I recorded it but of course it recorded actual
R1C1 of the range at the time. That doesn't work since

the
range will vary in size each time it is run.

So, I need to go something like this.

ActiveWorkbook.Names.Add Name:="AREA1" _
Range.(Selection, Selection.End(xlDown))

Thanks,


Bruce



.



All times are GMT +1. The time now is 01:36 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com