Geely
XLDnaute Occasionnel
Bonsoir le Forum
Je souhaterai en cliquant sur un bouton ouvrir Lotus Notes et mettre mon classeur actif en fichier joint dans le message sans l'envoyer directement.
avec ce code, Lotus notes s'ouvre bien, reste à joindre mon classeur Excel
La redaction du corp du message et l'envoie doivent rester manuel.
Sub Image28_QuandClic()
URLto = "mailto:destinataire@world.com" & "?subject=Sujet du mail" & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub
Merci de votre aide
Geely
Je souhaterai en cliquant sur un bouton ouvrir Lotus Notes et mettre mon classeur actif en fichier joint dans le message sans l'envoyer directement.
avec ce code, Lotus notes s'ouvre bien, reste à joindre mon classeur Excel
La redaction du corp du message et l'envoie doivent rester manuel.
Sub Image28_QuandClic()
URLto = "mailto:destinataire@world.com" & "?subject=Sujet du mail" & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub
Merci de votre aide
Geely