Envoi mail automatique avec conditions sur excel
Fermé
oumerri88
Messages postés
3
Date d'inscription
vendredi 15 mai 2020
Statut
Membre
Dernière intervention
17 mai 2020
-
15 mai 2020 à 14:46
Le Pingou Messages postés 12241 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 19 février 2025 - 17 mai 2020 à 11:59
Le Pingou Messages postés 12241 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 19 février 2025 - 17 mai 2020 à 11:59
j'ai un problème au niveau de l'envoi de message
j'ai une cellule A1 qui contiennent un chiffre si le chiffre <ou = 0 il faut envoyer un message Outlook a des destinateurs merci d'avance .
j'ai une cellule A1 qui contiennent un chiffre si le chiffre <ou = 0 il faut envoyer un message Outlook a des destinateurs merci d'avance .
A voir également:
- Envoi mail automatique avec conditions sur excel
- Yahoo mail - Accueil - Mail
- Liste déroulante excel - Guide
- Excel cellule couleur si condition texte - Guide
- Publipostage mail - Accueil - Word
- Comment calculer la moyenne sur excel - Guide
2 réponses
f894009
Messages postés
17242
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
12 mars 2025
1 713
Modifié le 15 mai 2020 à 15:23
Modifié le 15 mai 2020 à 15:23
Bonjour
Pouvez montrer le code que vous avez écrit?
Pouvez montrer le code que vous avez écrit?
Le Pingou
Messages postés
12241
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
19 février 2025
1 458
17 mai 2020 à 11:59
17 mai 2020 à 11:59
Bonjour,
Au passage, il vous renvoie une erreur.......mais laquelle?
Au passage, il vous renvoie une erreur.......mais laquelle?
15 mai 2020 à 16:18
16 mai 2020 à 23:34
Dim LeMail As Variant
If ThisWorkbook.Worksheets("feuil1").Names("A2").RefersToRange.Value <= 0 Then
Set LeMail = CreateObject("Outlook.application")
With LeMail.CreateItem(olMailItem)
.Subject = "un simple mail"
.To = "y.oumerri@ocpgroup.ma"
.Body = "un simple mail envoyer a moi"
.Display
End With
End If
End Sub
17 mai 2020 à 07:45
Et ca donne quoi?
17 mai 2020 à 11:49