[prog] Evènement

Mon, 16 Jan 2006 11:54:08 -0800

BOOonsOOoir,
 
J'utilise l'évènement "activation de document" pour lancer une macro. Le problème est que cette évènement se déclanche pour toute fenêtre qui s'active, que ce soit un classeur, un document, mais également l'éditeur de macro ou l'aide....
Moi je souhaiterais que mon code ne se lance que quand c'est un classeur qui est activé.
J'ai mis ce code:
 
Sub typeDocumentActif
Dim typeDoc As String
 
typeDoc = StarDesktop.ActiveFrame.Controller.Model.getImplementationName
 
' type de doc
' com.sun.star.comp.basic.BasicIDE ---->Editeur de macro
' ScModelObj -----> Excel
' SwXTextDocument -----> Writer
' SdXImpressDocument -----> Presentation et Dessin
If typeDoc <> "ScModelObj" Then Exit Sub
'*** mon traitement à effectuer ***
Print "Classeur sélectionné"
End Sub
 
mais a marche pô.
 
Quelqu'un a une idée?
 
Merci
 
Cathy (Merci pour Arnaud)

Répondre à