Access Form BefroeUpdate If statement

[tvman5683]

Hello!
I'm trying to add an "IF" statement to a BeforeUpdate code on an Access form. If the user enters Date1 I want the Date2 field to populate based on the "Then" code.
The Then code works on it's own but I will have entries that will not have a "Date1". that creates an error. Here's what I tried but didn't seem to work.
If Date 1 is not empty I want to calculate the Friday date 3 weeks previous.
Thanks for any help or ideas on this.

JB

If Me![DATE1] <> "" Then Me![DATE2].Value = [DATE1] + 8 - Weekday([WIS DATE], 6) - 21

 

[Norie]

Instead of <> "" try using IsNull.

If Not IsNull(Me![DATE1]) Then 
    Me![DATE2].Value = Me![DATE1].Value + 8 - Weekday(Me![WIS DATE].Value, 6) - 21
End If

 

[tvman5683]

Thanks Norie! that worked perfectly with and with a Date1

JB