Mail avec bouton macro excel et nom destinata

Bonjour,

Actuellement lorsque j'utilise une macro pour excetuer 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'à 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