Help needed on some code.

  • Thread starter Thread starter jfaz
  • Start date Start date
J

jfaz

I am new to coding and have had some success but am baffled by this.

I have a form that I wish to ensure that the end date is the same as or
after the start date. I have attached the following code but it fails at the
point where I am trying to clear out the end date field of the data entered.

I would be grateful if someone could point out to me where I am going wrong.


Private Sub End_Date_BeforeUpdate(Cancel As Integer)
If (Me.[End_Date]) <= (Me.[Start Date]) Then
MsgBox "Your must input a date after or the same as your start date"
[End_Date] IsNull
End If
End Sub

Any help would be welcome. Thanks in anticipation.
 
Are you try to set End_Date to Null? If so, the statement is
End_Date = Null

If that is not what you are attempting to do, then please post back with a
little more explanation.

--
John Spencer
Access MVP 2002-2005, 2007-2008
Center for Health Program Development and Management
University of Maryland Baltimore County
..
 
Hi jfaz,
I would add another suggestion to those already given by others:

with the if statement you wrote, i.e. Me.[End_Date]) <= (Me.[Start Date],
you reject Me.[End_Date]) = (Me.[Start Date] and I think you wanna allow this
conditions, so your if must be Me.[End_Date]) < (Me.[Start Date]

Cheers Paolo
 
Back
Top