Selection automatique d'une cellule en fonction d'une date

Bonjour,

Je souhaite qu'a chaque fois que j'ouvre la feuille "Dates" (que j'ouvre le classeur, ou que je change de feuille dans le classeur), la cellule sélectionnée automatiquement soit celle de la ligne 11 et de la colonne correspondant à la date du jour, donc en rouge.

Je suis allé sur des forums et j'ai trouvé une solution de macros:

Private Sub Worksheet_Activate()

Range("A1").Select

End Sub

Mais ça ne marche pas, même pour le cas de la sélection unique de la cellule A1 utilisé dans l'exemple du forum ou j'ai trouvé l'info.

Je n'ai jamais fait de macro, donc je ne sais pas si je respecte les étapes ou si la formule est bonne.

Quelqu'un a une solution? Quelles sont les étapes pour finaliser cette Macro?

Je joins le fichier.

Merci d'avance,

Gulli

Bonjour

Code à placer dans la feuille Dates

Private Sub Worksheet_Activate()
NumSem = DatePart("ww", Date, 1, 2)
For i = 2 To 53
LaSem = DatePart("ww", Sheets("Dates").Cells(1, i), 1, 2)
If LaSem = NumSem Then Sheets("Dates").Cells(11, i).Select
Next i
End Sub

Et Dans ThisWorkbook

Private Sub Workbook_Open()
NumSem = DatePart("ww", Date, 1, 2)
For i = 2 To 53
LaSem = DatePart("ww", Sheets("Dates").Cells(1, i), 1, 2)
If LaSem = NumSem Then Sheets("Dates").Cells(11, i).Select
Next i
End Sub

Amicalement

Nad

Bonjour Nad,

Merci d'avoir répondu encore une fois

Pour être sincère, j'ai éssayé de faire ce que tu m'as dit mais ça ne marche pas.

Je ne doute pas de ton expertise concernant excel mais plutôt de la mienne.

Je ne sais donc pas ou est mon erreur, par conséquent, pourrais tu m'indiquer les étapes pour copier/coller les codes et les activer.

Merci d'avance,

Gulli

Re

As-tu compris où copier les codes ?

As-tu activé les macros ?

Nad

Nad,

Non je n'ai pas compris les codes.....

Je les ai copié. J'ai fait alt+F11 , ça a ouvert microsoft visual Basic. Puis clique droit sur "Thisworbook" entouré en bleu, insertion, module et j'ai collé le code dans le module , et j'ai fait pareil pour "Feuil 1 Dates".

Je ne sais pas si c'est le bon process, et si oui, après je ne sais pas ce que je dois faire.

Merci d'avance,

Gulli

Bonjour

Ce n'est pas ça - Il n'y a aucun module à ajouter

Quand tu es dans VBA

- Pour le 1er code, tu dois le copier dans la feuille Dates

Pour le 2ème code, tu dois le copier dans ThisWorkbook

Amicalement

Nad

C'est parfait!!

Merci beaucoup

A+

Gulli