Recherche dans un classeur

[Dom]

Salut,


Je souhaiterai savoir comment, par VBA, dire à excel qui m'indique les feuilles ou les dates sont dépassées.

Par exemple sur toutes mes feuilles la cellules "B7" contient la date à laquelle excel doit me relancer. Je souhaite donc qu'à l'ouverture il m'indique les feuilles à relancer par rapport à la date du jour.


Merci pour votre aide,


Dom.

 

[sousou]

Le principe:
dans un language de méthode:

Dans la macro auto_open()
exécuter un code qui dit
Pour chaque feuille de mon classeur,
Regarde la cellule b7
si cette cellule > date du jour alors je le signal.


Dans un language plus direct:

Sub auto_open()

for each i in thisworkbook
madate= i.range("b7")
if madate> date then
msgbox "Lafeuille " & i.name & " à dépassée la date!"
'action de toutes sortes suivant les besoins'
end if
next

Bon courage