G
Guest
Hi All, hope someone can assist me?
I have a form where the user enters the date that a sale is DUE on
Later he will review records and will view this record.
I want to check if the DUE date previously entered is within 14 days either
side of today's date and will then pop up an alert.
I have so far created the following in the Current Sub of the form:
Private Sub Form_Current()
'Check due date & alert!
If Due = Date Then
Beep
MsgBox "Due Date needs Revising", vbOKOnly, "ALERT"
End If
End Sub
Can anyone tell me how I can expand this?
I thought of converting both DATE and Due to numbers, (DueNum & DateNum),
subtracting 14 from DateNum to get DateNumStart and Adding 14 to get
DateNumEnd then checking if DueNum is BETWEEN DateNumStart AND DateNumEnd
How could I achieve this?
All help gratefully acknowledged.
--
Cheers
Chas
***************
* Spectrum is Green *
***************
I have a form where the user enters the date that a sale is DUE on
Later he will review records and will view this record.
I want to check if the DUE date previously entered is within 14 days either
side of today's date and will then pop up an alert.
I have so far created the following in the Current Sub of the form:
Private Sub Form_Current()
'Check due date & alert!
If Due = Date Then
Beep
MsgBox "Due Date needs Revising", vbOKOnly, "ALERT"
End If
End Sub
Can anyone tell me how I can expand this?
I thought of converting both DATE and Due to numbers, (DueNum & DateNum),
subtracting 14 from DateNum to get DateNumStart and Adding 14 to get
DateNumEnd then checking if DueNum is BETWEEN DateNumStart AND DateNumEnd
How could I achieve this?
All help gratefully acknowledged.
--
Cheers
Chas
***************
* Spectrum is Green *
***************