Naming range question

[Guest]

I want to name a range (fulldata) starting at cell A2 on the worksheet and
ending at the last cell with a value in it on the same worksheet using VBA
code. Again, I need help.

Thank you.

 

[Nigel]

Dim myRange As Range
Set myRange = Range("A2:A" & Cells(Rows.Count, 1).End(xlUp).Row)
myRange.Name = "fulldata"

 

[Guest]

Thank you. This works to find the last cell in the same column but I need to
find the last cell used on the worksheet. It might be N1800 or G50. It will
never be the same. Could you help me with that?

 

[Bob Phillips]

Set rng = Range("fulldata")(Range("fulldata").Count)

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

 

[Ken Johnson]

Dim rngfulldata As Range
Set rngfulldata = Range("A2:" & _
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Address)
rngfulldata.Name = "fulldata"

Ken Johnson