Quick one

[peterbowles]

This code does not work


Text39 = Date

If (DateDiff(Text39, [EndDate]) >= 12) Then

MsgBox "End date near"

End If

What I am trying to do is: If Endate is within 12 months of the current data , Open MSGBox.

Any help Thanks

 

[Rich]

If DateDiff("m",[Text1],[Text2]) Then