How might I reference the cell currently being looked at within a `For Each` loop?

[JRCHAPMAN]

I am currently trying to learn the basics of VBA and have been using the following code to work on a column of cells

For Each foo In Range("A1", "A20")
    * Code *
Next

How might I return the cell being referenced at each iteration of this loop?

For example, suppose cells A1 to A20 contained integers and for each of these values I wished to write the square root in cells B1 to B20. How might this be done?

 

[JRCHAPMAN]

I thought that this might be possible using the code

For Each foo In Range("A1", Range("A1").End(xlToRight)).Cells
    MsgBox (foo.RowIndex)
Next

but this did not work.

 

[Rick Rothstein]

I am currently trying to learn the basics of VBA and have been using the following code to work on a column of cells

For Each foo In Range("A1", "A20")
    * Code *
Next

How might I return the cell being referenced at each iteration of this loop?

For example, suppose cells A1 to A20 contained integers and for each of these values I wished to write the square root in cells B1 to B20. How might this be done?

The variable foo automatically references the cells in range A1:A20 one at a time, so you would write it like this...

For Each foo In Range("A1", "A20")
  foo.Offset(0, 1) = Sqr(foo)
Next

 

[Joe4]

In your code "foo" is just a range value.
So to gets its value inside the loop, you can use:
foo.Value

To get its address, you can use:
foo.Address

 

[mikerickson]

.RowIndex is not a property of a Range object.

The loops you've set up are looping with the variable foo. Try something like

Dim foo as Range

For Each foo in Range("A1:D3")
    MsgBox foo.Address & " on row " & foo.Row
Next foo

 

[Fluff]

Hi & welcome to MrExcel
How about

Sub Squareroot()
   Dim Cl As Range
   
   For Each Cl In Range("A2", Range("A" & Rows.Count).End(xlUp))
      Cl.Offset(, 1).Value = Sqr(Cl.Value)
   Next Cl
End Sub

 

[JRCHAPMAN]

Thanks for all the help guys! Great to now be able to see several different ways of tackling this problem.