VBA Outlook - Joindre un PJ différente par mail

Bonjour,

Je souhaiterais créer 55 mails avec le même texte mais avec une pièce jointe différente par mail. J'aurais besoin d'aide sur la partie "Ajout d'une PJ" du code VBA OUTLOOK ci-dessous :

Pouvez-vous m'aider ? 

Mes PJ sont stocké sur le réseau dans un dossier spécifique : C:\Users\jeannev\OneDrive - test\Bureau\test\A envoyer

---------------------
Private Sub ExempleNewMail()
    Dim appOutlook As Outlook.Application
    Set appOutlook = Outlook.Application
    Dim MESSAGE As Outlook.MailItem
    Dim objRecipient As Outlook.Recipient
 
    Set MESSAGE = appOutlook.CreateItem(olMailItem)
    With MESSAGE
        .Subject = "test 2022"
 
        'Soit on ajoute un Corps en TEXTE BRUT
        .BodyFormat = olFormatPlain
        .Body = "Dear Madam/Sir" & vbCr & vbCr & "TEST" & vbCr & vbCr & "Best regards,"
 
        'Ajout d'un destinataire principal
        Set objRecipient = .Recipients.Add("***@***")
        objRecipient.Type = olTo    'olBCC, olCC, olOriginator ou olTo.
        objRecipient.Resolve
 
        'Ajout d'un destinataire en copie
        Set objRecipient = .Recipients.Add("***@***")
        objRecipient.Type = olCC    'olBCC, olCC, olOriginator ou olTo.
        objRecipient.Resolve
        '
        'Ajout d 'une PJ
       ???????????????????????????????
       
        'ajout ar lecture
        .ReadReceiptRequested = True
 
        'Je l'affiche
        .Display
        
    End With
End Sub

Merci beaucoup pour votre aide
Windows / Chrome 107.0.0.0