DateAdd not working

[quinnsfpa]

Hi, I'm new to this forum and, after tearing my hair out for the last day, am hoping someone can help me. I have a form which contains 2 date fields (DateReg and Deadline). I need the deadline date to automatically populate - 30 days after Date Reg

So far, I have tried to create an event for Deadline (On Click) and an event on DateReg (After Update), neither of which have worked. I have googled like crazy and tried several variations of code but none of them have worked.

The other thing I have tried is to just enter the code directly into the table (Default Value).

Can someone please tell me the code I should be using?

Thank you.

[June7]

There really is no need to save the Deadline calculated value. This actually violates common relational database wisdom. Calculate the value when needed.

Show the code you have attempted. Could simply be:

Me!Deadline = Me.DateReg + 30

[quinnsfpa]

Thank you for your very prompt reply June I'm afraid this is still quite new to me and I'm learning a lot as I go along. Two of the codes I attempted were DateAdd("d",30,date()) and DateAdd("d",30,[DateReg]). I'll try the code you've given me - Me!Deadline = Me.DateReg + 30 - but am unsure where to enter this code?

There really is no need to save the Deadline calculated value. This actually violates common relational database wisdom. Calculate the value when needed.

Show the code you have attempted. Could simply be:

Me!Deadline = Me.DateReg + 30

[June7]

You can use it in a query to construct a field or in textbox on form or report. Creating fields with expression in query is basic Access functionality. http://www.gcflearnfree.org/access2013/19

[quinnsfpa]

Thank you. I'd already tried entering the code directly into a text box but when I view the report I see #Name?

[June7]

The equation I provided would be used in VBA procedure to save the calculated value.

Otherwise, use expression in textbox ControlSource. This will display the value but not save to table.

= DateAdd("d",30,[DateReg]).

[quinnsfpa]

Thank you That's the code I was already using but I was trying to add it to the Deadline field. Now that I've entered it into a text box it's worked. Thank you! I can't believe it was something so simple as entering it into a text box instead of the actual field!

I've never used VBA but would certainly like to learn so I think I'll look into it. Thank you for your help - much appreciated.

The equation I provided would be used in VBA procedure to save the calculated value.

Otherwise, use expression in textbox ControlSource. This will display the value but not save to table.

= DateAdd("d",30,[DateReg]).