Autres Alerte email via Excel

  • Initiateur de la discussion Initiateur de la discussion SHASA
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

SHASA

XLDnaute Nouveau
Bonjour à tous 🙂

Je souhaite recevoir un email (dès l'ouverture du fichier excel) lorsqu'une date de formation arrive à échéance (J-7).
Si possible recevoir une fois l'email d'alerte et non pas à chaque ouverture 😀
---------------------------------------------------------------------------------------
mon tableau se présente sous la forme :
Colonne A : Nom
Colonne B : prénom
Colonne C : service
Colonne D : date de la formation
Colonne E : date d'échéance de la formation
---------------------------------------------------------------------------------------
En effectuant des recherches, je suis tombée sur la macro ci-dessous, comment puis-je l'adapter à mon besoin ? ou pouvez-vous me diriger sur une discussion qui pourrait éventuellement m'aider ?


merci d'avance pour votre aide précieuse.

Sub mail()
Dim i As Integer
Dim ol As Object, olmail As Object
Set ol = CreateObject("Outlook.Application")
Set olmail = ol.Application.CreateItem(olMailItem)
With olmail
i = ActiveCell.Row
.To = ’’ monadressemail@orange.fr ‘’
.Subject = " sujet à écrire "
.HTMLBody = "Bonjour " & ",<br/><br/> La formation de " & Cells(i, 1) & Cells (i, 2) & " arrive à échéance le : " & Cells(i, 5) & vbCrLf & " .<br/><br/>Cordialement.")
.Display (je remplacerai par .send)
End With

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
6
Affichages
739
Réponses
17
Affichages
2 K
Réponses
3
Affichages
896
Réponses
11
Affichages
2 K
Retour