for each cell in Range("A1:A1000,G1:B1000,K1:K1000")

Next

or
Range("A1:A1000,G1:B1000,K1:K1000").Name = "Robbie"
for each cell in Range("Robbie")

Next

--
Regards,
Tom Ogilvy

"robhargreaves"
wrote in message
news:robhargreaves.1ssjel_1122404899.6918@excelfor um-nospam.com...

Hi I have an interesting one for you.

If I have cells A1:A1000, G1:G1000 & K1:K1000

is it possible to create a named range for each of the 3000 cells in
code and call them all sequentially 1-3000

Thanks if you can help. This will save me so much time!

Rob


--
robhargreaves
------------------------------------------------------------------------
robhargreaves's Profile:
http://www.excelforum.com/member.php...o&userid=25519
View this thread: http://www.excelforum.com/showthread...hreadid=390315