Détecter les évènements d'un classeur depuis un complément

Bonjour à tous,

je code actuellement un complément Excel pour un déploiement plus facile sur les postes de l'entreprise, et je cherche une méthode pour détecter les évènements des classeurs ouverts depuis ce complément sans être obligé de rajouter du code VBA dans les fichiers Excel des utilisateurs.

Actuellement, j'ajoute ça dans les fichiers Excel (objet workbook) :

Code:

---

1 2 3 4 5 6 7

Sub Workbook_Open()   Call Application.Run("GxPAT.xlam!OpenWB", ThisWorkbook)   End Sub

---

Et je souhaiterai que ça se lance sans avoir à ajouter de VBA dans ces fichiers.

Si vous avez une piste, je vous en serai excessivement reconnaissant, je n'ai rien trouvé dans mes recherches ni mes essais...

Cordialement,

Stef

Bonjour,

pour que cela se lance je en place ton .xlam dans "compléments" de l'onglet développeur malheureusement il faut le faire sur chaque poste utilisateur.

donc si ils sont une dizaine ça peut se faire, s'ils sont plus cela devient une grosse galère et penser à une autre solution

donc ma question Combien sont'ils?

A bientôt

Salut.

Dans le module du workbook de ton complément, tu peux créer un objet Excel.Application en le déclarant avec WithEvents. Cela te permettra d'écouter les évènements de l'application. Il te suffit alors d'initisaliser l'objet à l'ouverture de ton complément et de gérer les évènements qui sont liés à l'application.

Pièce jointe 312679

Après, si tu places ton complément (un xlam) dans le dossier de démarrage d'Excel des utilisateurs, ton complément est lancé au démarrage d'Excel. Tu dois évidemment déployer ce complément sur tous les postes concernés.

Merci pour la première piste,

ils sont "nombreux" voire potentiellement quelques centaines, mais je voudrai garder le complément comme "caché", ou du moins qu'il soit transparent pour les utilisateurs. Je me suis posé la question aussi de son activation, effectivement il faudrait peut-être le faire manuellement dans ce cas.

Ce que j'ai fait pour le moment c'est :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Sub Workbook_Open()   AddIns("Gxpat").Installed = True   ' Checking that the Audit Trail Addin is opened On Error Resume Next ' turn off error checking Set ATComp = Workbooks(AddIns("Gxpat").Name) LastError = Err On Error GoTo 0 ' restore error checking If LastError <> 0 Then ' the add-in workbook isn't currently open. Manually open it. Set ATComp = Workbooks.Open(AddIns("Gxpat").Name) End If   Call Application.Run("GxPAT.xlam!OpenWB", ThisWorkbook)   End Sub

---

Ce qui active automatiquement le complément à l'ouverture du classeur.

La question d'origine est un peu différente: j'ai un code qui se lance quand l'utilisateur modifie son fichier Excel, normalement on détecte cet évènement en utilisant

Code:

---

1 2 3 4 5 6

Sub Workbook_SheetChange(ByVal ShId As Object, ByVal Source As Range)   Call Application.Run("GxPAT.xlam!RecSheetChange", ShId, Source, ThisWorkbook) ' lance le code de mon complément qui agit sur la modification   End Sub

---

Et je voudrai pouvoir détecter ce type d'évènement directement depuis mon complément sans inclure ce code dans le tableur Excel d'origine...

Merci Pierre pour cette réponse, ça m'éclaire déjà beaucoup plus.

Pour le déploiement du complément, je vais voir avec l'IT s'ils peuvent le faire eux-même à distance.

Je place le sujet en résolu !

Citation:

---

Envoyé par StefBBR

[...]Et je voudrai pouvoir détecter ce type d'évènement directement depuis mon complément sans inclure ce code dans le tableur Excel d'origine...

---

Je t'ai donné une piste pour activer le complément à l'ouverture d'Excel et pour qu'il capture l'évènement sur n'importe quel classeur.

Note toutefois que cet évènement survient après l'évènement identique sur ledit classeur, qui survient lui-même après un évènement de feuille.

Donc, si tu as par exemple ton complément avec une capture de SheetActivate au niveau xlApp, que tu utilises un classeur qui gère aussi SheetActivate et que tu actives une feuille qui gère elle aussi son activation, tu auras les évènements dans l'ordre suivant:
Activation de la feuille
Activation de la feuille au niveau du classeur
Activation de la feuille au niveau application

Fais très attention à ta gestion d'évènements car un code sur lequel tu n'as pas la maîtrise pourrait te faire partir en vrille.

Note également qu'il est impératif que tu gères les erreurs (on error...) pour rendre proprement la main en cas de soucis, car ton code entrera en concurrence avec du code écrit dans les classeurs ouverts.