Joindre un classeur ouvert à un e-mail oblige souvent à sortir du fichier, ouvrir la messagerie et aller chercher la pièce jointe dans les dossiers. Une macro d’une ligne fait tout cela d’un clic.
Dans l’éditeur VBA (Alt+F11), clic droit sur le projet, Insertion, Module, puis on colle la procédure ci-dessous. Application.Dialogs(xlDialogSendMail).Show ouvre la boîte d’envoi de la messagerie installée, avec le classeur déjà en pièce jointe. Il ne reste qu’à saisir le destinataire et le message.
Pour la déclencher, une forme ou une image dans la feuille suffit : clic droit, Affecter une macro, puis on choisit Envoyer_ce_fichier_par_mail. Le fichier reste ouvert, le travail continue.