Special today Date challenge question

What I want is have a today function eg in cell A1.

based upon entering any text in for eg b2, puts me the julian dat in cell
A2, So far, so good, I got that working.

Here is the challenge, the next day, I will have a new today date, however
I want to keep the juliandate in cell A2 as the day of yesterday. At this
moment, this date is also changing to the new today date.

I know it is possible with copy and paste special-value to get away from the
formula in A2, but that is not what I want.
Who has the answer????

many thanks
Emile Paulussen, the Netherlands

right click on the xl logo to the LEFT of FILE. Insert this.
Everytime you open the workbook it will put in today's date in cell a1 on
sheet 7.
Private Sub Workbook_Open()
Sheets("Sheet7").Range("a1") = Date
End Sub


--
Don Guillett
SalesAid Software

"ZONNET" wrote in message
news:dfOub.27862$6V.903247@zonnet-reader-1...
What I want is have a today function eg in cell A1.

based upon entering any text in for eg b2, puts me the julian dat in cell
A2, So far, so good, I got that working.

Here is the challenge, the next day, I will have a new today date,
however
I want to keep the juliandate in cell A2 as the day of yesterday. At this
moment, this date is also changing to the new today date.

I know it is possible with copy and paste special-value to get away from
the
formula in A2, but that is not what I want.
Who has the answer????

many thanks
Emile Paulussen, the Netherlands