If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Help with a Validation
I need a validation which will not allow booking's 1 week and not more than
2 months in advance of the date booked. If any body could offer ny advice I would be very grateful |
#2
|
|||
|
|||
Help with a Validation
=DateAdd("d",7,Date()) And =DateAdd("m",2,Date())
"Stibbz" wrote: I need a validation which will not allow booking's 1 week and not more than 2 months in advance of the date booked. If any body could offer ny advice I would be very grateful |
#3
|
|||
|
|||
Help with a Validation
I am sure this validation works but it isn't working with my pop up calendar.
I was wondering if you could check my VB for me??? It keeps on highlighting the starred line. Option Compare Database Private Sub Calendar2_Click() Event_Date.Value = Calendar2.Value**** Event_Date.SetFocus Calendar2.Visible = False End Sub Private Sub Event_Date_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Calendar2.Visible = True Calendar2.SetFocus If Not IsNull(Event_Date) Then Calendar2.Value = Event_Date.Value Else Calendar2.Value = Date End If End Sub |
#4
|
|||
|
|||
Help with a Validation
You need someone other than me to review your VB.
"Stibbz" wrote: I am sure this validation works but it isn't working with my pop up calendar. I was wondering if you could check my VB for me??? It keeps on highlighting the starred line. Option Compare Database Private Sub Calendar2_Click() Event_Date.Value = Calendar2.Value**** Event_Date.SetFocus Calendar2.Visible = False End Sub Private Sub Event_Date_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Calendar2.Visible = True Calendar2.SetFocus If Not IsNull(Event_Date) Then Calendar2.Value = Event_Date.Value Else Calendar2.Value = Date End If End Sub |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Visio 2003 for Enterprise Architects db generation troubleshootin | fbg111 | Visio | 1 | February 4th, 2006 12:54 PM |
Copy workbook- Validation function | sjs | Worksheet Functions | 3 | December 28th, 2005 03:00 PM |
data validation lists | [email protected] | General Discussion | 5 | June 25th, 2005 07:44 PM |
named range, data validation: list non-selected items, and new added items | KR | General Discussion | 1 | June 24th, 2005 05:21 AM |
validation hic-up -- no drop-down list! | valvebabe | General Discussion | 2 | July 9th, 2004 06:34 PM |