Problem with a Excel Calendar Datepicker in a Floating VBA Userform

Click on the calender to select it, then go to the view menu and then properties. Look for the name of the calendar. You should probably just select the name and copy it. Go to the code for the form and in the drop down list at the top on the right choose initialize.
You should get some code that looks like what's below without the date time picker stuff in it. Add your name then type the period and you should get intellisense giving you some choices, choose value and then type = date. You are recreating what you see below, but you have to use the actual name of your calendar.

Edit: Okay I didn't scroll down far enough in your PDF. It looks like your calendar is named calendar.
So if your type Calendar. you should get the intellisense list to pick value from. If you immediately get the list after typing the period we are on the right track. Also type date with a small d and after you hit enter it should turn to a capital D another sign things are working right.

Private Sub UserForm_Initialize()

DTPicker1.Value = Date

End Sub