Selection de cellule en fonction de la date

[xyvyos]

Bonjour,

J'aimerai que lorsque mon fichier excel s'ouvre, la cellule correspondant au mois en cours soit automatiquement selectionnée. Car c'est un calendrier sur 4 ans comportant seulement les mois. (chaque colonnes correspond à un mois).

Est ce que vous auriez une fonction ou une macro permettant cela svp ?

Merci

 

[gosselien]

Re : Selection de cellule en fonction de la date

😡 je suis sur Exel 2007/win 7 et quand ton fichier s'ouvre, je curseur est au bon endroit sur la ligne des mois et sur celui de novembre, ce qui est juste...

 

[job75]

Re : Selection de cellule en fonction de la date

Bonjour xyvyos, gosselien,

En effet il faut mettre la macro de mon post #6...

Bien comprendre qu'elle cherche un texte dans les en-têtes du tableau en ligne 6.

Maintenant on peut rechercher une date (nombre) avec cette macro :

Private Sub Workbook_Open()
On Error Resume Next 'si la date n'existe pas
Application.Goto Feuil1.Cells _
  .Find(DateSerial(Year(Now), Month(Now), 1), , xlFormulas)(2), True
End Sub

Là c'est la date en ligne 5 qui est trouvée puis décalée.

Fonctionne que la base de donnée soit sous forme de tableau ou non.

A+

 

[job75]

Re : Selection de cellule en fonction de la date

Re,

Chez moi sur Win 8 Excel 2013 ces fichiers avec les 2 méthodes fonctionnent bien.

A+

 

[xyvyos]

Re : Selection de cellule en fonction de la date

Parfait ça me va très bien 🙂

Merci job75 d'avoir essayé de trouver une solution

 

[job75]

Re : Selection de cellule en fonction de la date

Parfait ça me va très bien 🙂

Merci job75 d'avoir essayé de trouver une solution

Quelle solution vous convient ? Les 2 fonctionnent-elles chez vous ?

A+

 

[xyvyos]

Re : Selection de cellule en fonction de la date

La première ne marche toujours pas. Alors que la seconde marche bien

 

[job75]

Re : Selection de cellule en fonction de la date

Re,

Sur mon autre ordi avec Excel 2010 mes 2 solutions fonctionnent parfaitement.

Les 2 sont basiques, alors je pense que votre version Excel (?) a des problèmes.

D'ailleurs votre fichier indique chez moi une référence MANQUANTE (menu VBA Outils => Références).

A+