You're not changing the activecell.

But you could use:
Variable = C.Value.



Bob Allen wrote:

Using the Loop example from Excel Help -
For Each c In Worksheets("Sheet1").Range("A1:D10").Cells
If Abs(c.Value) < 0.01 Then c.Value = 0
Next
I've tried to use it to extract data FROM Excel by assigning a variable to:
Variable = ActiveCell.Value.

This doesn't work. Also, the ActiveCell not appear to interate through the
For Each Loop.

How do I extract a range of data into a VBA array?

--

Dave Peterson