Need help with pop-up calendar (Date & Time Picker)

drsarao said:

You can use calendar control along with Worksheet_Change event to position the calendar next to the input cell.

This will not be exactly a dropdown, but pretty close.

Try this:
Insert a Calendar control on sheet. (if not named Calendar1, then change it in the code below)
Goto code module of the same sheet and paste the code below.

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Calendar1.Visible Then Calendar1.Visible = False
    If Target.Column <> 3 Or Target.Count > 1 Then Exit Sub
    Calendar1.Left = Target.Left + Target.Width
    Calendar1.Top = Target.Top + Target.Height
    Calendar1.Visible = True
    Calendar1.Value = Date
End Sub
Private Sub Calendar1_Click()
    ActiveCell = Calendar1.Value
    Calendar1.Visible = False
    ActiveCell.Select
End Sub

This will cause a calendar to pop up whenever you click any cell in column C (can be changed of course). On selecting a date from calendar, it will get entered in the active cell and control will disappear.

Click to expand...

rjs1943 said:

I just made a control button from right clicking in the menu select form and type in opencalendar in the assign macro box. This is of course is using the calendar control add in.

Click to expand...