Name range example

[excelnut1954]

I know this will work to name a range for a single column.

Range(Selection, Selection.End(xlDown)).Name = "Test"

But, how would you adapt it to include the next 3 columns to the
right?

Thanks,
J.O.

 

[Guest]

Use Resize:

Range(Selection, Selection.End(xlDown)).Resize(,3).Name = "Test"

for a total of 3 columns. Change the 3 to a 4 if it is 3 additional columns.

 

[Guest]

Range(Selection.Resize(1, 3), Selection.End(xlDown)).Name = "Test"


"Tom Ogilvy" skrev: