Mail via Excel

Bonjour à tous,

Je ne sais pas si c'est possible, je souhaite intégrer un bouton à mon classeur exel qui me permet d'ouvrir outlook en ayant prérempli un texte mais sans mettre de destinataire?

Merci à tous pour votre aide.

David

Oui c'est possible

Dans la macro tu mets

.to = ""
Option Explicit
Sub envoi()

Dim messagerie As Object
Dim email As Object

    Set messagerie = CreateObject("Outlook.Application")
    Set email = messagerie.CreateItem(0)
    With email
        .to = ""
        .Subject = "test envoi mail"
        .Text = "ici le corps du mail"
    End With

    email.display

End Sub

David

Rechercher des sujets similaires à "mail via"