Dim cell as Range, i as Long
Dim C as Range
i = 0
For Each C In Range("A").Cells
set cell = Range("B")(i)
msgbox C.Address & " - " & cell.Address
Next

Also, if you want a range reference you need to use set

> src= Range("A")
> tgt= Range("B")

should be

set src= Range("A")
set tgt= Range("B")

--
Regards,
Tom Ogilvy




"colin_e" <coline@discussions.microsoft.com> wrote in message
news:881512DF-054E-4312-AFE5-B754385C10C5@microsoft.com...
> I'm reaonably new to VBA in Excel, although I've done some icoding in Word
> and Access.
>
> Problem
> --------
> I want to take the text contents of cells in one named range (call it
"A"),
> and apply them as notes to a range of the same size elsewhere (Call this
> range "B").
>
> The two ranges could be of any rectangular shape, but the two ranges will
> always be the same shape.
>
> I'm having difficulty getting my head around how to use ranges.
>
> If I get a handle on each range as an array, like:
>
> src= Range("A")
> tgt= Range("B")
>
> then I only seem to be able to access the basic value of the cell. I.e.
> "tgt" isn't an object, so I can't get to it's Comment property.
>
> Alternatively if I get a Cell Range object with:
>
> src= Range("A").Cells
> tgt= Range("B").Cells
>
> I'm having trouble getting the count of the rows/columns in each range so
I
> can write a nested loop to work through all the Cells.
>
> This has to be simple but I havn't found the right incantation yet. Most
> examples use something like:
>
> For Each C In Range("A").Cells
> ....
> Next
>
> This is great for accessing cells in one range, but not easy to work
between
> two ranges at the same time. Ideas/pointers would be great.
>
> Regards: Colin