DTPicker Validation

[tabby126]

ok so ive been using VBA excel for college work and we need to add a date picker tool to select a date however we need to validate it so that they cant select past dates this is what ive tried but its came up error can anyone help?


If DTPicker1 = < date then
MsgBox "You can not select a past date"
ValidateInput = false
Exit function
End if

please help me out here i really donno what im doing wrong

 

[Nine Zero]

try maybe

If DTPicker1.Value <= date then

for your first line

 

[tabby126]

ignore post above better link

https://prnt.sc/k1rm9v

sorry for double post

 

[Nine Zero]

ahh ok ..

do you have a variable for date?

if so ... change the name to checkdate for now then on that line also change Date to checkdate

If DTPicker1.Value <= checkdate then

it could be since Date is a reserved word in VBA its throwing it off

 

[tabby126]

ahh ok ..

do you have a variable for date?

if so ... change the name to checkdate for now then on that line also change Date to checkdate

If DTPicker1.Value <= checkdate then

it could be since Date is a reserved word in VBA its throwing it off

Public collection_date As Date - i have that in my modules and that line is coming up the same error

 

[Nine Zero]

Ok cool so try this
If DTPicker.Value <= collection_date Then

 

[tabby126]

Ok cool so try this
If DTPicker.Value <= collection_date Then

ok so with that it just wont proceed with right or wrong date like its acting as if frozen but thats it i can use all other functions

this has been the best help so far

 

[tabby126]

Ok still trying to sort this code out

 

[Norie]

Based on the image you posted it seems you have a problem with references.

Goto Tools>References...

If there is anything marked as MISSING note it's name and then uncheck it.

Once that's done save and close the workbook, then re-open the workbook and try the code again.