Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

For Each Loops for a range

Sub forEach()     Dim c As Range     For Each c In Range("A1:E10")         c.Value = c.Row * c.Column     Next End Sub