Modification de code envoi courriel

Bonjour,

Dans le code ci-dessous, lorsque je clique sur un bouton ce dernier transmet un courriel à l'adresse indiquée sur la cellule E9.

Ce que je souhaiterais, si c'est possible est qu'en modifiant ce code, il envoie en même temps le même courriel à l'adresse

indiquée en cellule E44.

Je vous remercie d'ores et déjà de toute votre aide et vous souhaite d'ores et déjà une très bonne journée.

Sub envoiClasseur()

Dim Fichier As Variant

'Identification d'Outlook comme client de messagerie"

Dim MaMessagerie As Object

Dim MonMessage As Object

Set MaMessagerie = CreateObject("Outlook.application")

Set MonMessage = MaMessagerie.CreateItem(0)

'Destinataires du mail'

MonMessage.to = Range("E9")

'identification du fichier ouvert à envoyer'

MonMessage.Attachments.Add ActiveWorkbook.Path & "\" & ActiveWorkbook.Name

'Sujet du mail'

MonMessage = "Décision de demande de congé"

'Corps du mail'

'Chr(10) & Chr(13)= saut de ligne"

contenu = "Bonjour,"

contenu = contenu & Chr(10) & Chr(13)

'Chr indiquent des sauts de lignes'

contenu = contenu & "Veuillez trouver en PJ notre décision concernant votre demande de congé" & Chr(10) & Chr(13)

contenu = contenu & "Veuillez, en prendre connaissance et restons à disposition pour toute information complémentaire." & Chr(10) & Chr(13)

contenu = contenu & "La direction vous souhaite d'ores et déja une excellente journée." & Chr(10) & Chr(13)

contenu = contenu & "Cordialement," & Chr(10) & Chr(13)

contenu = contenu & " "

MonMessage.body = contenu

'envoi du message'

MonMessage.send

'réinitalisation de la messagerie'

Set MaMessagerie = Nothing

'Boite de dialogue"

MsgBox "Votre message a bien été envoyé"

End Sub

Bonjour,

Pour ajouter la cellule E44 en destinataire (pas en cc), changez la ligne que vous avez mis en gras par

MonMessage.to = Range("E9") & ";" & Range("E44")

Bonne journée

Bonjour saboh12617,

Je vous remercie de votre correction qui fonctionne à merveille.

Je vous reitère tous mes remerciments et vous souhaite une excellente fin de journée.

Merci pour votre retour, content d'aider. N'oubliez pas de clôturer le fil.

Bonne fin de journée.