Edit calender code further upon click

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Private Sub Calendar5_Click()
findappoint.Value = Calendar5.Value
findappoint.SetFocus
Calendar5.Visible = True

What could I add to this code in order to refresh the form after the date is
selected. I have a filter for the date placed in an unbound box from the
calender, but you have to use a button to refresh the page every time a new
date is pressed. I would like to alleviate this extra step.
 
Aaveer:

Assuming findappoint is the name of your date textbox and that your bound
date field is of Date/Time data type, you might add code similar to the
following:

Me.Filter = "MyDate=#" & CDate(Me.findappoint) & "#"
Me.FilterOn = True

--
David Lloyd
MCSD .NET
http://LemingtonConsulting.com

This response is supplied "as is" without any representations or warranties.


Private Sub Calendar5_Click()
findappoint.Value = Calendar5.Value
findappoint.SetFocus
Calendar5.Visible = True

What could I add to this code in order to refresh the form after the date is
selected. I have a filter for the date placed in an unbound box from the
calender, but you have to use a button to refresh the page every time a new
date is pressed. I would like to alleviate this extra step.
 
Back
Top