Thanks Bob. Issue resolved


Bob Phillips wrote:
Are they contiguous? If so just use

LastRow = Cells(Rows.Count,"A").End(xlUp).Row
Set MyRange = Cells(LastRow,"A").Offset(-4,0).Resize(5)

--
HTH

Bob Phillips

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

"godonnygo" wrote
in message ...

Kind of similar to this, I was wondering how to find the last 5
non-blank items in a range (which just say I've called "TheRange")


--
godonnygo
------------------------------------------------------------------------
godonnygo's Profile:
http://www.excelforum.com/member.php...o&userid=37124
View this thread: http://www.excelforum.com/showthread...hreadid=568925