notification par mail suite modif excel

Question

Bonjour,



Pour commencer je n'y connais pratiquement rien sur excel donc svp patience.

Voici mon problème, je suis entrain de faire un tableau dont le but est d'avoir un suivi des problèmes ou des modifications sur des appareils qui circulent partout en France. Plusieurs personnes auront accès à ce fichier et chacune pourra le modifier. je voudrais que à chaque modif du fichier une notification me soit envoyée automatiquement par email(Outlock 2003).

Question : comment faire?

D'avance merci pour votre aide

m@rina · Accepted Answer

Bonjour,

Il faudrait créer une macro événementielle à l'enregistrement du fichier. Cette macro t'enverra le mail.

Alt + F11 pour te rendre dans le VBE (Visual Basic Editor)
Copie la macro suivante
Ouvre le module Workbook de ton fichier (sur la gauche)
Colles-y la macro et personnalise-la (ton adresse mail, l'objet du mail, le texte)


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Dim ol As Object, monmail As Object
DisplayAlerts = False
Set ol = CreateObject("outlook.application")
Set monmail = ol.CreateItem(olMailItem)
monmail.To = "cyril@adresse.com"
monmail.Subject = "Modifs"
monmail.Body = "Modifications enregistrées dans le fichier trucmuche"
monmail.Send
Set ol = Nothing
End Sub

Bien évidemment, ce ne peut pas être fait derrière le dos de l'utilisateur...
On pourrait même ajouter un message qui s'afficherait pour que l'utilisateur sache que le mail a bien été envoyé.

m@rina

pitycrazy · Answer

bonjour

Cette macro fonctionne parfaitement bien.
Par contre j'aurais aimé savoir si il était possible d'y ajouter quelques lignes de codes pour que dans le mail reçu, on puisse voir le ou les noms de pages modifiées ainsi que les numéros de lignes correspondantes.
En vous remerciant par avance

Pity

Notification par mail suite modif excel

2 réponses

Discussions similaires

Newsletters