Créer un bouton + macro pour envoi mail avec destinataire et pièce

Bonjour,

Actuellement lorsque j'utilise une macro pour exécuter la commande envoyer par mail une fiche en temps que pièce jointe. Le destinataire ne s'affiche pas. La formule VBA est la suivante :

Sub Mail()
'
' Mail Macro
' Mail
'

'
Application.Dialogs(xlDialogSendMail).Show
ActiveSheet.Shapes("Button 2" ).Select
ActiveSheet.Shapes("Button 2" ).Select
Selection.Characters.Text = "Retour mail à finasso@free.fr"
With Selection.Characters(Start:=1, Length:=29).Font
.Name = "Arial"
.FontStyle = "Italique"
.Size = 8
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Range("E33" ).Select
End Sub

Quelle serait la formule pour que le nom du destinataire (en l'occurence le mien) apparaisse automatiquement dans la liste des destinataires, afin que le membre de l'assos n'ait plus qu'en cliquant sur le bouton associé à la macro à envoyer le mail accompagné de sa fiche d'inscription....?

J'ai eu beau consulter le blog... je n'ai pas trouvé ou je dirais que c'est un peu compliqué pour moi...
Merci pour votre éclairage.
Cdlt

Configuration: Windows XP
Internet Explorer 6.0
Lire la suite

Configuration: Windows XP
Internet Explorer 6.0