loop

[LiSa]

Hi

I know you can do a loop for each worksheet in the
workbook, but can you do one for each cell within a range
eg C4:H9
If so, how ?

ty

 

[Ken Wright]

Sub Chng()
For Each Cel In Range("C4:H9")
Cel.Value = Cel.Value * 2
Next Cel
End Sub

or

Sub Chng()
Set Rng = Range("C4:H9")
For Each Cel In Rng
Cel.Value = Cel.Value * 2
Next Cel
End Sub

etc