détecter un classeur activé

[mariobros]

bonjour le forum
pouvez vous me fournir un code pour détecter si un classeur est activé ou non , afin que je puisse l'insérer dans une procédure if/then par exemple :if 'le classeur1 est activé' then...........
merci pour vos sugestions.

 

[Franck]

Salut mariobros

ActiveWindow, propriété

Cette propriété renvoie un objet Window qui représente la fenêtre active (celle qui se trouve au premier plan). En lecture seule. Elle renvoie la valeur Nothing si aucune fenêtre n'est ouverte.

Exemple
Cet exemple montre comment afficher le nom (propriété Caption) de la fenêtre active.

MsgBox 'The name of the active window is ' & ActiveWindow.Caption

donc : if ActiveWindow.Caption = ... then
...
Else
...
End if

Idem pour les feuilles d'un classeur

A+ Franck

 

[mariobross]

oui ok j'ai compris et j'ai testé merci.
par contre aurai tu une idée pour détecter si le classeur est ouvert (qu'il soit activé ou non) .

 

[Franck]

RE mariobros

Comprend pas !
Pour etre actif il faut q'il soit ouvert ??

Franck

 

[Franck]

Re

Op OP répondu trop vite
Bien sur bien sur
je regarde ça et je reviens

Franck

 

[Franck]

Re mariobros

Voila une boucle sur les Workbooks avec une condition (le nom du classeur )


For Each w In Workbooks
If w.Name = 'xxx' Then ...
Next w


J'ai pas testé mais ça doit marcher

A+ Franck

 

[mariobross]

bon ok si j'ai bien compris en remplaçant les xxx par le nom du classeur , lorsque celui çi est ouvert la condition if est remplie meme si le classeur n'est pas celui qui est actif.
merci demain je teste ce soir c'est un peu tard.