Existe-il un évènement workbook open ?

Merci pour ton aide et ton exemple
Pour le moment j'ai essayé de tester ton code (sans connaitre les modules
de classe) et j'ai cette erreur :
Type défini par l'utilisateur non défini

Le débogueur bloqué sur cette ligne :
Dim oApp As New MyAppClass

@+
Bartez


"lSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
%23rsVlyhlGHA.3740@TK2MSFTNGP02.phx.gbl...

Bonsoir,
Tu peux mettre cela dans ton classeur ou dans perso.xls ex qd un classeur
est ouvert on affiche un message
Il ne s'agit donc plus du niveau classeur mais du niveau application.

Il te faut

un module de classe.

Fenêtre propriétés le nommer MyAppClass


'''''****dans MyAppClass****
Public WithEvents XLEvents As Application

Private Sub XLEvents_WorkbookOpen(ByVal MyWb As Excel.Workbook)

MsgBox "Un classeur vient d'être ouvert"

End Sub

'''''****dans le thisworkbook de perso ou de ton premier classeur****
Private Sub Workbook_Open()
Call startit
End Sub

'''''****dans le module standard du même classeur****
Dim oApp As New MyAppClass

Sub startit()
Set oApp.XLEvents = Application
End Sub



'lSteph



"Bartez63" <naz@naz.fr> a écrit dans le message de news:
O9UoxchlGHA.2344@TK2MSFTNGP04.phx.gbl...

bonjour,

Je me demandais s'il existait un évènement récupérable dans un classeur
qui indique qu'un autre classeur vient d'être ouvert ?

Houlala ... c'est pas très claire mon truc :)

Est-ce qu'il existe une macro qui peut détecter l'ouverture d'un 2em
classeur ou d'un 3em façon "Workbook_Open" mais dans qui serait
accessible à partir du 1er classeur ouvert ?

Francement, si quelqu'un comprend ce que je veux...Chapeau ! partce,
même moi j'arrive pas à expliquer ce que j'ai besoin.

Merci quand même de votre aide pour ceux qui ont déjà lut ça !

@+
Bartez

...
http://cjoint.com/?gwu4Fm8pDf


"Bartez63" <naz@naz.fr> a écrit dans le message de news:
e9KC$vilGHA.3396@TK2MSFTNGP05.phx.gbl...

Merci pour ton aide et ton exemple
Pour le moment j'ai essayé de tester ton code (sans connaitre les modules
de classe) et j'ai cette erreur :
Type défini par l'utilisateur non défini

Le débogueur bloqué sur cette ligne :
Dim oApp As New MyAppClass

@+
Bartez


"lSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
%23rsVlyhlGHA.3740@TK2MSFTNGP02.phx.gbl...

Bonsoir,
Tu peux mettre cela dans ton classeur ou dans perso.xls ex qd un
classeur est ouvert on affiche un message
Il ne s'agit donc plus du niveau classeur mais du niveau application.

Il te faut

un module de classe.

Fenêtre propriétés le nommer MyAppClass


'''''****dans MyAppClass****
Public WithEvents XLEvents As Application

Private Sub XLEvents_WorkbookOpen(ByVal MyWb As Excel.Workbook)

MsgBox "Un classeur vient d'être ouvert"

End Sub

'''''****dans le thisworkbook de perso ou de ton premier classeur****
Private Sub Workbook_Open()
Call startit
End Sub

'''''****dans le module standard du même classeur****
Dim oApp As New MyAppClass

Sub startit()
Set oApp.XLEvents = Application
End Sub



'lSteph



"Bartez63" <naz@naz.fr> a écrit dans le message de news:
O9UoxchlGHA.2344@TK2MSFTNGP04.phx.gbl...

bonjour,

Je me demandais s'il existait un évènement récupérable dans un classeur
qui indique qu'un autre classeur vient d'être ouvert ?

Houlala ... c'est pas très claire mon truc :)

Est-ce qu'il existe une macro qui peut détecter l'ouverture d'un 2em
classeur ou d'un 3em façon "Workbook_Open" mais dans qui serait
accessible à partir du 1er classeur ouvert ?

Francement, si quelqu'un comprend ce que je veux...Chapeau ! partce,
même moi j'arrive pas à expliquer ce que j'ai besoin.

Merci quand même de votre aide pour ceux qui ont déjà lut ça !

@+
Bartez