Userform Calendar - Current Date

  • Thread starter Thread starter D
  • Start date Start date
D

D

How do you get the Calendar to open with the current date selected. Here is
what I have but it is not working. The calendar opens with the
date in which I created the calendar. The name of my Calendar is Calendar1.
I have tried setting the properties for the month, day, year, to be 0.

Private Sub frmCalendar_Open()
Calendar1.Value = Date

End Sub
 
try placing your code in the userforms intialize event:

Private Sub UserForm_Initialize()
Calendar1.Value = Date
End Sub
 
Back
Top