envoi par mail

C'est possible seulement si Outlook est installé sur l'ordinateur depuis lequel tu veux envoyer le mail (excel n'a pas de client mail natif donc on est obligé d'utiliser Outlook via l'API).

J'ai trouvé un tuto qui explique comment faire, avec une macro : http://www.rondebruin.nl/win/s1/outlook/amail4.htm

Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

With Dest
    .SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
    On Error Resume Next
    With OutMail
        .to = "ron@debruin.nl"
        .CC = ""
        .BCC = ""
        .Subject = "This is the Subject line"
        .Body = "Hi there"
        .Attachments.Add Dest.FullName
        'You can add other files also like this
        '.Attachments.Add ("C:\test.txt")
        .Send   'or use .Display
    End With
    On Error GoTo 0
    .Close savechanges:=False
End With