Comparing Dates in VBA

[trigirl67]

If I want to say...If the [Completion Date] > 6 months old, then do something...how do you say in VBA code?

 

[pbaldy]

Presuming it's on the form, along these lines:

If Me.CompletionDate < DateAdd("m", -6, Date()) Then

 

[trigirl67]

Thank you but what if the completion date comes from a table not a field on the form?

 

[pbaldy]

You could use DLookup() or open a recordset to get the value from the table. Perhaps you can clarify what you're trying to achieve.

 

[trigirl67]

How do you do an open recordset? There is a form which is linked to a table and in the table there is a field called completion date that is updated from a different form. So I want to update a field [Request Type] based on an ID field and if the completion date is > 6 months old, then update the requet type field to "New".

 

[pbaldy]

You may find DLookup() easier:

http://www.mvps.org/access/general/gen0018.htm

 

[trigirl67]

So how would you incorporate the Dlookup and the if statement?

 

[pbaldy]

If DLookup(...) < DateAdd("m", -6, Date()) Then