Discussion :

[xXGoldenboyXx]

Bonjour à tous,

Je voulais mettre une macro sur un document excel 2010 pour recevoir un mail à chaque fois qu'un collègue fait une modification sur un document commun à une 15aines de personnes, mais dont l'analyse des données me revient. Pour éviter de vérifier le document tout les jours cette macro me serait très utile (savoir l'historique des modifications serait la cerise sur le gâteau). Etant totalement novice en macro et VBA, j'ai cherché sur le net et j'ai trouvé ici et ailleurs cette macro:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
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 = "moi@adresse.com"
monmail.Subject = "Modifs"
monmail.Body = "Modifications apportees dans le fichier"
monmail.Send
Set ol = Nothing
End Sub

apparemment ça fonctionne mais pas pour moi, j'ai cocher les référence pour Outlook (dans outils du VBA), rien. je dois surement faire quelque chose de tordu, ou ne pas avoir les bon réglages, ou autres problème je ne sais pas quoi. Si quelqu'un peut m'aider. je peut éventuellement envoyer une ébauche du document par mail pour le checker. j'espère que quelqu'un pourra m'aider.

Merci d'avance.
xXGoldenboyXx

[Invité]

Bonjour,

Le message auto-macro-affichage-onglet-historique contient la macro HistoriqueDesModifications qui permet de faire apparaître l'historique des modifications d'un fichier partagé (voir également la solution macro complémentaire) également dans ce message.
Au cas où vous avez la main sur le fichier depuis votre pc, quel est l'intérêt de vous noyer de mails alors que vous pouvez avoir les données en lecture directe ?

[xXGoldenboyXx]

Bonjour,

Le message auto-macro-affichage-onglet-historique contient la macro HistoriqueDesModifications qui permet de faire apparaître l'historique des modifications d'un fichier partagé (voir également la solution macro complémentaire) également dans ce message.
Au cas où vous avez la main sur le fichier depuis votre pc, quel est l'intérêt de vous noyer de mails alors que vous pouvez avoir les données en lecture directe ?

Merci, je vais jeter un oeil là dessus.
Justement ce n'est pas un document modifier régulièrement mais qui peut l'être par une 15aine de personnes, plusieurs fois en 2-3 jours comme inchangé pendant 1 mois. et je donc je ne peut pas me permettre d'aller voir tout les jours si quelque chose à changé ou non. D'où cette macro me serait très utile pour la gestion des données qu'elle contient sans cette contrainte journalière.

[Invité]

Bonjour,
Déjà quand on utilise createobject on a pas besoin de référencer la librairie!

D'autre part, bien souvent l'installation de Outlook l'option prise en main par une application tiers n'est pas activé!

Vérifies le options de Outlook!

[xXGoldenboyXx]

Bonjour,
Déjà quand on utilise createobject on a pas besoin de référencer la librairie!

D'autre part, bien souvent l'installation de Outlook l'option prise en main par une application tiers n'est pas activé!

Vérifies le options de Outlook!

Bonjour,

Effectivement je n'ai pas pensé à un blocage du coté d'Outlook mais plus d'Excel.
Je regarde ça demain au travail et creuse la piste Outlook. Merci

[Oliv-]

Bonsoir
Il faut régler dans Excel le niveau de sécurité des macros à moyen. Et vérifier que les macros fonctionnent

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Sub test ()
Msgbox "hello world"
End Sub

Ensuite il faudra obliger les utilisateurs à activer le contenu (les macros)

[Oliv-]

https://www.developpez.net/forums/d1...k/#post8720639

[xXGoldenboyXx]

Bonsoir
Il faut régler dans Excel le niveau de sécurité des macros à moyen. Et vérifier que les macros fonctionnent

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Sub test ()
Msgbox "hello world"
End Sub

Ensuite il faudra obliger les utilisateurs à activer le contenu (les macros)

Bonjour Oliv

Déjà merci pour tes réponses, j'essayerai cela demain au travail et je vais lire la page que tu as partagé.
Merci en tout cas.

[xXGoldenboyXx]

Bonjour Oliv,

Du coup j'ai étudié ce que tu avais mis sur l'autre poste et ton code semble fonctionner sans erreur de codage sur mon document car il n'y a pas de message d'erreur comme initialement, mais je pense que maintenant il y a une erreur de paramètre chez moi. Lorsque je fais F5 pour essayer la macro cela m'ouvre la fenêtre "atteindre" en me demandant les "références" et là je sèches encore

[Invité]

Bonjour
Enlèves toutes référence à Outlook et utilises ce code!

https://www.developpez.net/forums/d1...t/#post7968025

[xXGoldenboyXx]

Bonjour
Enlèves toutes référence à Outlook et utilises ce code!

https://www.developpez.net/forums/d1...t/#post7968025

Bonjour,

Ce code ne fonction pas non plus, cela m'affiche " Erreur d'execution '-2147024893 (80070003)':
erreur Automation
Le chemin d'accès spécifié est introuvable

Voilà