Macro VBA compter mail arrivés dans mois dans dossier spécificique

Bonjour à tous,

Je me permets de vous écrire afin de trouver un solution à mon blocage.

Afin d'éviter de compter manuellement le nombre de mail reçu dans le mois dans un sous dossier spécifique de ma boite de reception, je souhaite l'automatiser dans une macro.

J'ai réussi à créer une macro qui compte le nombre de mail dans le dossier spécifique. C'est le critère reçu entre 01/12/2020 et 31/12/2020 qui tombe en erreur.

<code>
Dim ns As NameSpace
Dim Inbox As MAPIFolder
Dim NewInbox As MAPIFolder
Dim Item As Object
Dim FileName As String
Dim DossierConteneur As Outlook.MAPIFolder
Dim MaBoite As Store
Dim Dossier As Folder
Dim Dossier2 As Folder
Dim MyItemsSet ns = GetNamespace("MAPI")
Set MaBoite = ns.Stores("Cessions Auto")

Set Dossier = MaBoite.GetDefaultFolder(olFolderInbox).Folders("Correspondance épave")
MsgBox Dossier.Name & " " & Dossier.Items.Count

Set Dossier = MaBoite.GetDefaultFolder(olFolderInbox).Folders("Correspondance épave")
Set MyItems = Dossier.MailItems("[ReceivedTime] >= '" & Format("01/12/2020", "ddmmyyyy") & "'" & "' and < '" & Format("31/12/2020") & "'")
MsgBox Dossier.Name & " " & Dossier.MyItems.Count
<code basic>

Je vous remercie de votre aide.

Amélie