Substitute

For Each clCell in Range("NamedRange")

Alan Beban

Mark M. wrote:
I have a named range that is 10 rows by 10 columns.

If possible, I'd like to use the "For Each" construct to
go thru the range.

Could somebody give me some sample code?

I would think the code would look some thing like this:

Dim clCell as Cell
For Each clCell in NamedRange
if clCell.Value = 10 then clCell.value = 20
Next clCell

Thank you for your help,

MarkM

Thanks for the help.

Mark M.


-----Original Message-----
Substitute

For Each clCell in Range("NamedRange")

Alan Beban

Mark M. wrote:
I have a named range that is 10 rows by 10 columns.

If possible, I'd like to use the "For Each" construct
to
go thru the range.

Could somebody give me some sample code?

I would think the code would look some thing like this:

Dim clCell as Cell
For Each clCell in NamedRange
if clCell.Value = 10 then clCell.value = 20
Next clCell

Thank you for your help,

MarkM



.