Salut,
Code de base repris d'un fichier de @Thierry, merci a lui, car je m'en sert trés souvent, lol
sub EnvoieMail()
Dim Link As String
Link = 'mailto:' & Adresse & '?Subject=Objet'
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
end sub
Adresse, peu être un control, une variable dans lequel est inscrit l'objet
Objet et le suject du message
Si je me trompe corriger, s'il vous plait afin de n'induire personne en erreur.
Salut, G'Claire