Calendrier déroulant

Bonjour. J'a iinstallé le "Date and Time picker" sur Excel 2016.

Pour quel raison est ce que le calendrier ne se déroule pas pour pouvoir sélectionner une date précise?

Doit-je ajouter une macro afin de pouvoir faire dérouler le calendrier?

Merci.

Bonjour,

Essaie ainsi (après avoir supprimer les cellules fusionnées) :

Option Explicit

Private Sub DTPicker1_Change()
    ActiveCell.Value = DTPicker1.Value
End Sub

Private Sub DTPicker1_Click()
    ActiveCell.Value = DTPicker1.Value
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Rng As Range, Rng2 As Range

    Set Rng = Me.Range("D7,D13")
    Set Rng2 = Intersect(Target, Rng)
    If Not Rng2 Is Nothing Then
        DTPicker1.Visible = True
        DTPicker1.Top = Target.Top
    Else
        DTPicker1.Visible = False
    End If

    Set Rng2 = Nothing: Set Rng = Nothing

End Sub