There is a way to do this with formulas:
In columne E, use one of the following:
=LOOKUP(D1,A:A,B:B)
or
=INDEX(B:B,MATCH(D1,A:A,0),1)
or
=SumIf(A:A,D1,B:B)

I prefer the sumif since it doesn't return anything if no match
exists. The others return #NA if there is no match.

No code is needed.

But you could incorporate this into code...

hth

--
steveb
(Remove 'NOSPAM' from email address if replying direct)
"saturnin02" <saturnin02_at_hotmail.com wrote in message
...
Hi,
I have a series as such:
Cell A1 =Date Cell B1= value
Cell A2= Date(A1+1 as value) Cell B2=value
etc.

I would like to be able to extract only weekly data (the series is daily)
and have the values in a separate sheet or side by side with the daily
series but with no gaps or spaces--
Cell D1=Date Cell E1=value
Cell D2= (Date +7) Cell E1- corresponding value of D2, etc.

I need to avoid the lengthy cut and paste and "automate" as much as I can
the process.

Any suggestions??
Tx a lot,
S