Macro erreur mail envoi

Bonjour a tous,

J'ai un code erreur "type defini par utlisateur non defini" quand je clique sur le bouton envoi mail de ma macro.

QQ'un peut m'aider a regler le souci?

Merci

Bonjour

C'est le fait que tu utilise le Early Binding dans la déclaration des variables

Dim EmailApp As Outlook.Application

il faut ajouter la référence microsoft OUTLOOK dans le menu : Outils\reférences

Sinon il faut passé par une déclaration Late Binding

Fred

Voici comment faire une déclaration Late Binding

remplacer

Dim EmailApp As Outlook.Application
Set EmailApp = New Outlook.Application

par

Dim EmailApp As Object
Set EmailApp = CreateObject("outlook.application")

Fred

Hello Fred,

Meme avec le late binding, je n'ai pas réussi :(

BOnjour

Oui j'ai oublié la dernière étape...

pour faire la création du mail il faut faire :

Dim EmailItem as object    
Set EmailItem = EmailApp.createitem(0)

Fred

Cela fonctionne parfaitement, bravo et merci Fred!!!!