Updatable Active X Calander

[Gary Eck]

Is there a calander that I can put on my form that will update to current date when I open form

Gary

 

[sfreeman@co.mer]

Calendar Control 10.0

Insert, ActiveX Control, select Calendar Control 10.0.

Not a big fan of Sendkeys, but this works...

In the OnOpen event for the form:

Private Sub Form_Open(Cancel As Integer)
SendKeys "^t"
End Sub

 

[Rich]

Private Sub Form_Load()
Me!SelectDate.Today
End Sub

where SelectDate is the name of your cal control