Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Envoi de mail automatique sans ouvrir fichier

A

axel307

XLDnaute Nouveau
Bonjour,

J'ai vu qu'il est possible d'envoyer un mail d'avertissement en automatique.
Je m'occupe d'une gestion de cuve GRV, avec une date de 1er visite et une date de fin d'utilisation.
Le fichier n'étant pas consulté régulièrement, je souhaite avoir une alerte.
je souhaiterais qu'un mail d'avertissement soit envoyé 30 jours avant la date de fin d'utilisation à plusieurs personnes.
J'utilise outlook et excel version 2017.
J'ai vu sur le forum quelque discussion, mais je n'arrive pas à le faire fonctionner même en changeant l'adresse mail. (EBAUCHE - RECLAMATIONS SALARIES.xlsm)
J'ai un niveau novice en VBA.

Merci pour votre aide
 

Pièces jointes

  • Copie de Dates de péremption des cuves pour le transport ADR.xlsx
    18.3 KB · Affichages: 11
Trier par date Trier par votes

Wayki

XLDnaute Impliqué
Bonjour,
Si votre fichier excel est en ligne (sur votre Cloud), laissez Microsoft Power automate faire ça.

Microsoft Power Automate – Plateforme d’automatisation de processus | Microsoft

Utilisez les outils Power Automate pour automatiser les processus sur des systèmes, des applications de bureau et des sites web presque illimités à l’aide de l’automatisation des processus IA, numériques et robotiques.
powerautomate.microsoft.com
Vous avez il me semble des Flux pré-complétés à ce sujet. Choisissez celui qui vous convient, ajustez-le à votre désir, et il le fera tout seul de lui même sans s'en occuper.
Si vous avez des questions, je tacherai d'y répondre.
Peut-être quelqu'un du forum vous fera le code VBA entre temps.
A +
 
Vote positif 0 Vote négatif
R

Rossoneri83

XLDnaute Nouveau
Bonjour
Il me semble que tu es seras obligé d'ouvrir ton fichier excel pour pouvoir envoyé tes mails.
Tu peux faire une procédure événementielle à l'ouverture.
Ci-dessous un code assez simple à utiliser
Bonne journée

Sub envoiMail()

Dim mail As Object
Dim mailenvoyer As Object

Set mail = CreateObject("Outlook.Application")
Set mailenvoyer = mail.CreateItem(olMailItem)

With mailenvoyer
.Subject = "Ton sujet"
.to = "les destinataires du mail"
.Attachments.Add "piece jointe"
.body = "le corps de mon mail"
.send
End With

End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

C
  • Résolu(e)
XL 2013 VBA - Envoi d'un mail avec fichier excel à une liste de destinataires - corps du mail issu d'un mail modèle prédéfini
Réponses
7
Affichages
943
Chrystel01
C
  • Résolu(e)
Microsoft 365 Mail envoi automatique avec texte
6 7 8
Réponses
105
Affichages
6 K
TooFatBoy
M
  • Résolu(e)
Microsoft 365 Envoi automatique mail
2
Réponses
22
Affichages
3 K
matmac
M
C
  • Résolu(e)
XL 2013 vba - envoi d'un mail avec le choix de l'adresse mail expéditeur (qd on a 2 comptes)
Réponses
4
Affichages
736
Chrystel01
C
L
  • Question
Microsoft 365 vba Outlook traiter un fichier excel lors de sa reception
Réponses
0
Affichages
499
lesoldat9
L
O
  • Question
XL 2010 Envoi mail (outlook) avec lien vers PJ
Réponses
1
Affichages
590
Dudu2
S
  • Résolu(e)
Microsoft 365 Fusion de 2 macro VBA (selection envoi de mail + envoie de fichier PDF)
Réponses
6
Affichages
2 K
soNZOOO
S
S
  • Question
Microsoft 365 Envoi de mail auto VBA d'une cellule à une autre + selection de plusieurs PJ.
Réponses
3
Affichages
1 K
kiki29
A
  • Question
XL 2019 MACRO VBA - Envoi mail automatique
Réponses
1
Affichages
974
fanch55
P
  • Question
XL 2019 Envoyez un mail automatique sur date de fin
Réponses
3
Affichages
965
fanch55
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…