We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
COURSE of the MONTH
12 days, 11 hours left to enrollBecome a Premium Member and unlock a new, free course in leading technologies each month.
Solved
Enhancement to my Code to Check if a Date is Greater Than the Current Date
Posted on 2013-06-19
I have code that checks a date in a field to see if it is less than or equal to the current date. I have it on the BeforeUpdate Event of the Field, so the focus automatically goes back to this field, but the old date that the user entered is still sitting there.
After the cursor's focus is back in that field, I would like to have the field wipe out the old date (clear the field) and be blank and ready for the user to enter the correct date.
When I tried putting in the following line of code: me.Quality_Review_Date.val
after the line of code "Cancel=True", I get run-time error '2115'.
Below is the code I'm using to check the Date field:
Thanks,
gdunn59
After the cursor's focus is back in that field, I would like to have the field wipe out the old date (clear the field) and be blank and ready for the user to enter the correct date.
When I tried putting in the following line of code: me.Quality_Review_Date.val
after the line of code "Cancel=True", I get run-time error '2115'.
Below is the code I'm using to check the Date field:
If Me.Quality_Review_Date.Value > (Date) Then
MsgBox ("You must enter a date less than or equal to today's date!")
Cancel = True
End If
Thanks,
gdunn59
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
-
4
3- +1
9 Comments
Active today
This will do:
If Me!Quality_Review_Date.Value > Date Then
MsgBox ("Please enter a date less than or equal to today's date.")
Me!Quality_Review_Date.Undo
Cancel = True
End If
Active 2 days ago
Is the code running from the BeforeUpdate event of the textbox with the date? That is where it should be.
cactus_data:
Sorry, I didn't see in your posting that you had put in the "Undo" command. I pasted in your code from ID: 39261706, and it worked. It places the cursor back in the Date field, with the date highlighted, the only thing is it doesn't wipe out the date that is already there.
Is there a way around this to have the field get wiped out all together? If not, that's fine. At least the field/date is highlighted and the user can just type and it will wipe out the existing date with the new date the user types in.
Thanks,
gdunn59
Sorry, I didn't see in your posting that you had put in the "Undo" command. I pasted in your code from ID: 39261706, and it worked. It places the cursor back in the Date field, with the date highlighted, the only thing is it doesn't wipe out the date that is already there.
Is there a way around this to have the field get wiped out all together? If not, that's fine. At least the field/date is highlighted and the user can just type and it will wipe out the existing date with the new date the user types in.
Thanks,
gdunn59
Active today
OK, that explains.
And no, Undo will not wipe out anything, just revert a change.
If that isn't enough, you will have to use the AfterUpdate event but this will, of course, only trig if data has been changed, and that is what you wish to prevent.
/gustav
And no, Undo will not wipe out anything, just revert a change.
If that isn't enough, you will have to use the AfterUpdate event but this will, of course, only trig if data has been changed, and that is what you wish to prevent.
/gustav
Featured Post
ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.
One of a set of tools we're offering as a way to say thank you for being a part of the community.
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
Did you know that more than 4 billion data records have been recorded as lost or stolen since 2013? It was a staggering number brought to our attention during last week’s
ManageEngine
webinar, where attendees received a comprehensive look at the ma…
Traditionally, the method to display pictures in Access forms and reports is to first download them from URLs to a folder, record the path in a table and then let the form or report pull the pictures from that folder.
But why not let Windows retr…
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string.
Specify the first argument, which is the expression to be returned:
Specify the second argument, which …
The viewer will learn how to use the =DISCRINV command to create a discrete random variable, use this command to model a set of probabilities and outcomes in a Monte Carlo simulation, and learn how to find the standard deviation of a set of probabil…
Suggested Courses
Course of the Month12 days, 11 hours left to enroll
777 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.