Recherche jour courant dans un calendrier

[simraill]

Bonjour tout le monde,

Voilà j'ai un soucis, je veux trouver la cellule correspondant au jour actuel dans un calendrier.
Mais je n'arrive même pas à trouver le mois en cours avant d'essayer de trouver le bon jour...

Si quelqu'un peut m'aider je désespère...

Merci
Simraill

 

[youky(BJ)]

Re : Recherche jour courant dans un calendrier

Salut bien,
Le plus simple aurait été de mettre le jour en date en format "jj"
pour la macro. . .

col = DateDiff("d", CDate("31/12/2011"), Now) + 1
Cells(4, col).Select

Bruno

 

[st007]

Re : Recherche jour courant dans un calendrier

Bonjour,
Je l'aurai plutôt vu comme çà ..

 

[simraill]

Re : Recherche jour courant dans un calendrier

@youky : je ne vois pas ce que cela aurait changer de mettre au format "jj", mais en tout cas ton code marche ^parfaitement, merci beaucoup!!

@st007 : je ne comprends pas du tout ce que tu as fait...

 

[bbb38]

Re : Recherche jour courant dans un calendrier

Bonjour simraill, youky(BJ), st007, le forum,
Merci simraill pour ta question. Grâce à la réponse de Bruno, j’ai amélioré ma macro (dans le ThisWorkbook).
P.S. Bruno : Félicitations pour ton code.
Cordialement,
Bernard

 

[youky(BJ)]

Re : Recherche jour courant dans un calendrier

Bonjour à tous,
Je viens de me rendre compte que le fichier avait des colonnes vident correspondantes au 29/02 lors d'années bissextiles.
Cela décale la macro et PB pour bientôt.
Solution
Soit supprimer toutes ces colonnes à vide et supprimer le .....+1 dans la macro

Ou utiliser ce fichier qui utilise bien les formules et MFC
Il est très facile de modifier la date de Départ en A1 et tout ce mets en forme.
A+
Bruno