thanks guys, I cant claim to understand how to achieve it right now but I am
now looking in the right direction and will have a go! any more ideas -
especially those more closely related to my ability - greatfully recieved.

" wrote:

I don't know what is wrong with me today. I guess i am
still upset about Frank Kabel.
you are right. a hard date would be needed.
Date = #1/18/05# + 30 then
sorry about that.

-----Original Message-----
hi again,
thanks for catching that. it should be
if date = now()+30 then
....
had a mind blip there.
and you are right. not a good idea. but it's not my
request. and a messge was display to explain.
I should have added to the message the the user should
delete the file since it is not longer useful and to see
the author of more up to date data.
he has options. others posted too. I didn't think of the
very hidden idea. that might be better. but it still does
the same thing. takes away the data and make the file
useless to the user. what is the difference?

-----Original Message-----
This will never fire, since Date will never equal Now +
30.

Instead of Now, you'd have to use a fixed date.

I'd also suggest that, in most cases, deleting the data
from a third
party's machine is not a smart idea.


In article ,
wrote:

in the on open event you can put a timer
if date()=now()+30 then
sheets("sheet1").select
cells.select
Selection.ClearContents
end if
range("A1").formulaR1C1 = "the data in this file has
been
delete because it is out of date."
classic virus
.

.