Help with Dynamic Calendar

[mikeellinas]

Hi everyone. I have been searching and searching, but could not find anything. I am using a form in Excel and in the date filed, I have a "pop up calendar." I created the form in April 2018. When I click the field, the calendar pops up. At the bottom, it says Today: 7/16/2018 like it should, but the calendar itself with clickable dates is still set to April. We have to click the arrow a few times to get to July. I am trying to make it where the calendar displays today and the clickable dates are automatically at the current date.

In the VBA, I have frmCalendar which is from ActiveX.

Then I have Module 3 which is:

Sub OpenCalendar()
frmCalendar.Show
End Sub

Anyone have any ideas? I do not mind taking a different approach as long as it works.

 

[Bodyslide]

Under the Forms view the code and add this line before With frmCalendarplace:

MonthView1.Value = Date

Then you should be all set. Good Luck