Discussion :

[Pascalou1983]

Bonjour,
J'ai récupéré un fichier excel que je dois améliorer. Je ne peux donc pas repartir de zéro et je ne sais pas ce qu'a fait le précédent avant moi mais le calendrier créé se comporte bizarrement et je suis bloqué.
Voilà le principe : on définit une date de début ex : A1 = 01/08/2009.
puis par la formule simple B1 = A1 + 1 on définit sur toute la ligne 1 un calendrier.
Le format de date personnalisé utilisé est j/m.
Mon problème est le suivant : lorsque j'utilise la fonction rechercher de Excel ou un find en visual basic, impossible de trouver la cellule dans laquelle il y a une date dont le jour ou le mois est un nombre.
cette ligne de code, renvoie "Nothing" pour Date = 10/08/2009

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set cell_today = Range("1:2").Find(Format(Date, "d/m"), LookIn:=xlValues)

Ex : pour les jours du 1/8 au 9/8, et du 1/9 au 9/9 : pas de problème.
Mais pour du 10/8 au 31/8 et du 10/9 au 31/12, impossible de trouver la cellule.
Je pense bien que celà doit venir d'une propriété de mes cellules, mais franchement je suis largué.
J'ai mis en pièce joiinte le fichier excel.
Merci par avance.
Pascal