Pbm activation macro envoi mail outlook

Bonjour,

Je ne suis qu'une débutante mais j'ai un soucis pour activer une macro. Je souhaite envoyer un mail suite à une macro qui sera affectée à un bouton.

J'ai défini dans mes paramètres à qui doit-on envoyé le mail, le sujet et le corps du message ?

Je souhaite que ça soit l'utilisateur qui valide l'envoi du mail et non en automatique.

J'utilise Outlook.

Voici ma macro :

Sub dangereuxfinlande()

Dim OutApp As Object

Dim OutMail As Object

Set olApp = CreateObject("outlook.application")

Set olMail = olApp.CreateItem(0)

With OutMail

.To = Worksheets("param").Range("C8").Value

.CC = Worksheets("param").Range("D8").Value

.Subject = Worksheets("param").Range("E8").Value

End With

End Sub

MERCI A TOUS

bonjour,

code corrigé et complété (tu t'es emmêlé les pinceaux avec olmail et outmail), je t'ai ajouté .body pour le corps et .display pour affichage du mail pour validation avant l'envoi.

Sub dangereuxfinlande()
    Dim OlApp As Object
    Dim OlMail As Object
    Set OlApp = CreateObject("outlook.application")
    Set OlMail = OlApp.CreateItem(0)
    With OlMail
        .To = Worksheets("param").Range("C8").Value
        .CC = Worksheets("param").Range("D8").Value
        .Subject = Worksheets("param").Range("E8").Value
        .body = "corps du message"
        .display
    End With
End Sub

Super merci trop génial .

Rechercher des sujets similaires à "pbm activation macro envoi mail outlook"