Dim rng As Range
Set rng = Range(ActiveCell, ActiveCell.End(xlToRight))
Set rng = Range(rng, rng.End(xlDown))
rng.Name = "myName"


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

wrote in message
ups.com...
I'm trying to create a macro command that will create a range name for
a range that is set by the end - right - end - down process (since the
dimensions will change each time it's run) I'm sure it's easy, but
I'm just a rookie at this.