Macro envoi mail bloque certain menus Excel

bonjour,

je cherche pourquoi la macro ci jointe, ralenti et bloque certains menu d excel .

faut il ajouter une commande pour décharger quelque chose qui crée ce problème ?

je n'ai pu joindre le fichier excel complet

merci