Macro envoie mail si cellule contient...

licinia Messages postés 2 Statut Membre -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour à tous,

Je sais qu'il y a déjà beaucoup de sujets sur la création de macros qui permettent d'envoyer un mail, mais je n'y ai malheureusement pas trouvé mon bonheur.

Je souhaiterai créer une macro qui me permettrait d'envoyer un mail en utilisant Outlook, dès que le mot "relance" apparaît dans une certaine colonne de mon tableau Excel.

Pouvez-vous me dire comment faut-il faire?

En vous remerciant d'avance

2 réponses

lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
Faire une boucle sur la colonne qui contient le mot de rappel
Et ensuite voir cette demo pour envoyer les mails.
A+
0
licinia Messages postés 2 Statut Membre
 
Bonjour,

Merci beaucoup pour votre réponse. Je n'arrive en revanche pas à faire fonctionner la macro (je ne suis pas très douée en VBA...)

J'utilise Excel 2010 et la définition suivante n'est pas prise en compte :
Dim ObjOutlook As New Outlook.Application
Est-ce normal ?

Cela donnerait donc quelque chose comme suit ??

Sub BoucleRelance()
Dim Relance
Dim i As Integer
For i = 1 To ....
If Cells(i, 4).Value = "relance" Then
Sub Envoyer_Mail_Outlook()
ETC

Merci pour votre aide
0
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Tu a ajouter la référence reprise dans la démo ?
0
lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Tu pourrais pas mettre ton classeur à disposition (sans donnée confidentielle) ?
Ou au moins un modèle fidèle à ton classeur

Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
Note: Je ne répond pas aux MP pour les questions techniques. Et ma boule de cristal est cassée .
0