Thanks Guys, I guess a For...Next will have to do. BTW they do not overlap,
so that was not a concern.
Tom Ogilvy wrote in message
...
I don't believe there is a way to address those sub areas all at once. A
workaround would be
Dim ar as Range
for each ar in Range("nr1,nr2,nr3,nr4,nr5).Areas
ar.Range("B2:C6").ClearContentns
Next

--
Regards,
Tom Ogilvy


"Mike Fogleman" wrote in message
news:C%mqc.73503$iF6.6186157@attbi_s02...
I have a number of named ranges all identical in size and shape. I want
to
ClearContents of the same group of cells in each range. Can I address
them
collectively?
eg:
Range("nr1, nr2, nr3, nr4, nr5").Range("B2:C6").ClearContents 'This
does
not work

Mike