For Each cell In Range(Range("B3"),Range("B3").End(xlDown)

cell.Value = ????
Next cell

does what I think you are asking

--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Richard" wrote in message
...
OS: MS XP, Excel 2003

I have a table and using relative addressing to read down column B.
I can select the cell and make it active but don't know how to assign the
cell value to the variable.

The cell starts with B3 and goes down. B3, B4, B5 etc. The value is a
date.

I need to know how to read the cell value from the active cell. I know
how
to do it by saying B3 but don't know how to do it without the B3 which I
don't know as I am using relative addressing.
Thanks in advances.
--
Richard--
Richard