Cette information peut peut être vous être utile:
Les instructions pelle-mêle ci dessous marchent dans une forme affichée en non modal, et pas seulement dans un module de classe, contrairement à ce qui est dit dans l'aide:
Code :
Private WithEvents Excel As Application
Set Excel = Application
Set Excel = Nothing
Private Sub Excel_SheetActivate(ByVal Sh As Object)
Ainsi que tous autres évènements au niveau Excel global.
le nom d'une varable déclarée WithEvents vient s'insérer parmi les autre objets dont vous pouvez insérer des modèles de sub évènements.
Génial ! Non ?
@+