Macro envoi de mail : "Erreur 424 : Objet requis"

TITILALA Messages postés 1 Date d'inscription jeudi 13 avril 2023 Statut Membre Dernière intervention 13 avril 2023 - Modifié le 13 avril 2023 à 19:31
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 13 avril 2023 à 16:38

Bonjour tout le monde, 

J'ai déjà utilisé la structure de la macro ci-dessous avec succès pour envoyer des mails. Mais j'ai souhaité m'en inspirer pour l'utiliser sur un autre fichier et je n'arrive pas à la faire fonctionner. Quand je fais "Débogage", et que j'exécute la macro, cela me surligne la ligne en gras dans la macro ci-dessous et j'ai le message : "Erreur d'exécution 424 : objet requis". 

Est-ce que quelqu'un sait d'où peut provenir le problème :

Sub ENVOYER()

Dim oOutlook As Object

Set oOutlook = CreateObject("Outlook.Application")

Dim oMail As Object

Set oMail = Outlook.CreateItem(0)

With oMail

    .To = Range("L2")

    .Subject = Range("B2")

    .Body = Range("B4")

    .Display

End With

End Sub

Merci par avance pour vos réponses.

Bonne journée ! :)

1 réponse

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 137
13 avril 2023 à 16:38

Bonjour,

il faut activer la librairie Outlook

VOIR CECI


0
Rejoignez-nous