Ajouter un message de confirmation Oui/NON à mon code VBA

Bonjour,

SVP j'ai besoin de votre aide pour ajouter une notification de confirmation par Oui/NON à mon code VBA

En fait, j'ai une macro qui me sert à envoyer automatiquement mon fichier excel par mail à certains destinataires ( voir ci-dessous)
Je souhaite donc ajouter à ce code une ligne qui va afficher une notification demandant si je souhaite vraiment envoyer ce mail ? Oui/NON

Oui ==>Le mail s'envoie
NON ==> Pas d'action

Pouvez-vous s'il vous plait m'aider ? Quel code dois-je faire ? Dans quelle ligne ?

Merci


==============================

Sub envoiMail()
Dim Fichier As Variant
Fichier = Workbooks(ActiveWorkbook.Name).FullName
Dim MaMessagerie As Object
Dim MonMessage As Object
Set MaMessagerie = CreateObject("Outlook.Application")
Set MonMessage = MaMessagerie.createitem(0)

MonMessage.SentOnBehalfOfName = "moi@gmail.com"
MonMessage.to = "destinataire1@gmail.com; destinataire2@gmail.com "
MonMessage.Attachments.Add Fichier
MonMessage.Subject = "TOC_DSR_Tasks&RITMs_" & Application.Text(Date, "ddmmyyyy")

Contenu = "Bonjour,"
Contenu = Contenu & Chr(10) & Chr(13)
Contenu = Contenu & "Veuillez trouver Ci-joint le DSR du jour pour la partie RITM/Task"
Contenu = Contenu & Chr(10) & Chr(13)
Contenu = Contenu & "Cordialement,"
Contenu = Contenu & Chr(10) & Chr(13)
Contenu = Contenu & "Moi"
Contenu = Contenu & Chr(10) & Chr(13)
Contenu = Contenu & "Metier"
MonMessage.body = Contenu
MonMessage.send
Set MaMessagerie = Nothing
MsgBox "Votre Mail a bien été envoyé avec la pièce jointe "
End Sub

=====================================================================