Macro pour lister les "Suivi des modifications"

  • Initiateur de la discussion Initiateur de la discussion laskoo87
  • 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 !

laskoo87

XLDnaute Nouveau
Bonjour à tous !

Je reviens avec une petite question...

Nous sommes dans un workflow.
J'ai une feuille avec un bouton "envoi mail". En cliquant, ce bouton envoi un mail avec l'emplacement de mon fichier à la personne suivante.

Ce que je souhaiterai ajouter à ce mail: La liste des modifications éffectuées sur la feuille.
En gros, ce qu'il y avait en cellule A1 et ce qu'il y a maintenant.

Est ce possible?

Voici le code actuel que j'ai:
Code:
Sub EnvoiMail_Outlook_MKT()
'Creation de l'objet e-mail
Dim ol As New Outlook.Application
Dim olmail As MailItem
Dim CurrFile As String
Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olmailItem)
'Caractéristiques de l'e-mail
With olmail
.To = Range("Circuit!G12").Value & ";" & Range("Circuit!G13").Value & ";" & Range("Circuit!G6").Value & ";" & Range("Circuit!G7").Value
'Affiche le nom comme objet du message
.Subject = "Fiche Article " & ActiveWorkbook.Name
.Body = "Bonjour," & Chr(13) & Chr(13) & "La fiche article " & ActiveWorkbook.Name & " viens d'être créée." & Chr(13) & "Vous la trouverez à l'adresse suivante: " & ActiveWorkbook.FullName & ". " & Chr(13) & "Merci de traiter cette fiche dans les 48h." & Chr(13) & Chr(13) & "Bonne réception." & Chr(13) & Chr(13) & Application.UserName

'Pièces jointes si il y a lieu
'attention le chemin est à changer pour ton besoin
    '.Attachments.Add "C:\PGI\Résultats.xls"

'Remplacez .Display par .send pour envoyer directement l'e-mail sans l'afficher dans Outlook
.Send

MsgBox "Message envoyé !"

End With
End Sub

C'est donc dans le corps du mail que je voudrai que la liste des modif s'affiche.
Sous la forme de tableau, ligne par ligne... peu importe mais je souahiterai les voir...

Vous avez une idée pour moi?

Merci d'avance!
 
Re : Macro pour lister les "Suivi des modifications"

Milles excuse je n'avais plus d'accès Internet!!

Merci Hippolite, cela peu etre utile mais dans mon cas je souahite intégrer les modification dans le corps de mon mail... je ne sais aps si cela est possible...

Une autre idée peu etre??!!

A+
 
- 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
2
Affichages
809
Réponses
3
Affichages
896
Réponses
1
Affichages
1 K
Réponses
11
Affichages
2 K
Retour