When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub
--
Gary''s Student - gsnu200747

You only need to loop when you have to test values in each cell for some
condition.



"Gary''s Student" wrote:

When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub
--
Gary''s Student - gsnu200747

Thank you!
--
Gary''s Student - gsnu200747


"Joel" wrote:

You only need to loop when you have to test values in each cell for some
condition.



"Gary''s Student" wrote:

When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub
--
Gary''s Student - gsnu200747

Was that a philosophical question? A loop may be more practical, efficient
and useful to speed up repetitive comparisions or to perform repetitive
commands, but necessary implies that there is no other way. <g

"Gary''s Student" wrote:

Thank you!
--
Gary''s Student - gsnu200747


"Joel" wrote:

You only need to loop when you have to test values in each cell for some
condition.



"Gary''s Student" wrote:

When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub
--
Gary''s Student - gsnu200747

No it can't.

Alan Beban

Gary''s Student wrote:
When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub

????

The two routines return different results...


In article ,
Gary''s Student wrote:

When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub

JE & Alan:

You are both correct. The difference in the results shows the error in my
thinking

Thanks for replying.
--
Gary''s Student - gsnu200747


"JE McGimpsey" wrote:

????

The two routines return different results...


In article ,
Gary''s Student wrote:

When is it necessary to loop over the cells in a range as opposed to setting
some property of the entire range at once. For example:

Sub loop_test()
Dim rr As Range, r As Range
Set rr = Range("A1,C10,D12")
For Each r In rr
r.Value = r.Address
Next
End Sub


can be accomplished with:

Sub loop_test2()
Dim rr As Range
Set rr = Range("A1,C10,D12")
rr.Value = rr.Address
End Sub