outputmessage = "Merci de votre email. Je serai absent de mon bureau jusqu'au" & EndDate & " et votre email ne sera pas transmis." & vbNewLine & vbNewLine & "J'aurai un accès limité à mon e-mail pendant cette période." & vbNewLine & vbNewLine & "Pour toutes questions urgentes, n'hésitez pas à contacter " & namecontact & " à l'adresse email suivante " & emailcontact & "." & vbNewLine & vbNewLine & "Cordialement,,"
subjectmessage = "[ABSENT DE MON BUREAU] Je compte revenir dans " & outputmessagetime & " jours."
FRANCES