Sub Mail_workbook()

ActiveWorkbook.SendMail "[email protected]", _

"This is the Subject line"

End Sub

Si vous souhaitez envoyer le classeur où le code est placé, vous devez utiliser la ligne suivante:

ThisWorkbook.SendMail "[email protected]", _

Remarque: il n’est pas nécessaire qu’il s’agisse du classeur actif utilisé à ce moment-là.