XL 2013 comment créer une alert et envoie mail

Big66677 · 30 Décembre 2020

bonjour
ont ne pourra pas dire que je n'est pas chercher.
donc voila.

une date d’envoi d'une commande. le 30 decendre pour exemple
une cellule indique le nombre de jour de délais d’exécution 30 jours mais peut varier
si la date de départ et dépasse alors alerte puis envoie mail.

A1 30 descendre 2020 A2 30 jours de délais A3 alerte envoie mail 1persone A4 envois mail 2éme personne

merci

Staple1600 · 31 Décembre 2020

Bonjour le fil, Big66677

=>Big66677

le 30 descendre pour exemple

Mon calendrier ne connait pas ce mois.
Mon Excel, non plus.

On commence mal.

Sinon pour ta question:
Quel est ton client de messagerie?
Outlook?

Staple1600 · 31 Décembre 2020

Re

En attendant le réveillon
(pour exemple et à titre illustratif)
A tester sur un classeur vierge)

VB:

Sub Alerte_A_Mail_Hibou()
[A1] = CDate(DateSerial(2020, 10, 10)) 'juste pour test
If Date - [A1] >= 30 Then
With CreateObject("Outlook.Application").CreateItem(0)
    mBody = "<html><body>Bonjour, <br><br>" & vbNewLine
    mBody = mBody & "Ceci est une <b><span style='color:red'>ALERTE ROUGE</span></b><br><br>"
    mBody = mBody & "Veuillez consulter <a href=""https://www.404-error.com/"">l'annuaire</a></p>"
    mBody = mBody & "</body></html>"
    .Subject = "Achtung, Baby!"
    .To = "toto@domain.fr"
    .HTMLBody = mBody
    .Display
    '.Send
End With
End If
End Sub

Big66677 · 31 Décembre 2020

merci
1000excuses pour le mois.
merci pour le code.
mon client de messagerie est bien Outlook.

------------------------------------------
sinon pour l'orthographe je suis un avant-gardiste-libertaire donc non violent.
le principe et de faire au mieux avec cette langue maternel (pourtant)
-------------------------------------------

Staple1600 · 31 Décembre 2020

Re

Besoin d'aide pour adapter le code VBA proposé?
Ou tu es en mesure de le faire par toi-même?

Big66677 · 5 Janvier 2021

Vraisemblablement,
mais le tableau n'est pas fini et je pense qu'il va être long à faire.
Je me suis encore parti dans un truc et j'ai un an pour le faire .....
merci

Staple1600 · 5 Janvier 2021

Bonsoir le fil, Big66667

=>Big66677
Déjà est-ce que tu as réussi à faire fonctionner mon code?
(en mettant une vraie adresse mail

XL 2013 comment créer une alert et envoie mail

Big66677

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

Big66677

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

Big66677

XLDnaute Occasionnel

Staple1600

XLDnaute Barbatruc

Discussions similaires