XL 2016 - [RESOLU] - Ouverture du fichier Excel, selectionner la cellule à la date du jour

heru13 · 25 Octobre 2020

Bonjour à tous,

J’ai un planning en fichier Excel sur une période de l’année.
Je voudrais par macro, à l’ouverture du classeur, que la cellule active corresponde à la cellule qui détient la date d’aujourd’hui.
Exemple, aujourd’hui nous sommes le 25/10/2020, donc à l’ouverture du fichier Excel joint, la cellule active devrait être BD5.

Si en plus le volet est figé en laissant apparaitre la colonne avec les NOMS et à partir de la colonne concernée par la date... cela serait le top !

Bonne journée.

Phil69970 · 25 Octobre 2020

Bonjour Heru, le forum

Rendons hommage bien que je ne le connaissais pas à quelqu'un qui nous a quitté il y a quelques jours.

https://www.excel-downloads.com/thr...sur-une-ligne-determinee.196495/#post-1224467

Tu as plu qu'à recopier le code .... et remplacer "B5:ADN5" par "B5:BJ5"

@Phil69970

heru13 · 25 Octobre 2020

Oui Phil, rendons hommage,

Et par la même occasion, je te remercie, je n’avais pas vu ce post, qui correspond exactement à ce que je cherchais...

Bravo, et un grand merci pour ta réactivité.

Allez bonne nuit, il est temps de faire dodo..

A+ ;-)

job75 · 25 Octobre 2020

Bonjour heru13, Phil69970,

On peut éviter une boucle avec cette macro dans ThisWorkbook :

VB:

Private Sub Workbook_Open()
On Error Resume Next 'si la date n'est pas trouvée
Application.Goto Feuil1.Cells(5, Application.Match(CLng(Date), Feuil1.[5:5], 0)), True
End Sub

A+

heru13 · 25 Octobre 2020

Bonjour Job75,

C'est une astuce à noter.
Comme j'ai plusieurs macro dans le ThisWorkbook, j'ai opté par l'appel de plusieurs macro par Call.
Dans le fichier joint, j'ai modifié le tableau avec plus de jours pour bien voir le résultat.

XL 2016 - [RESOLU] - Ouverture du fichier Excel, selectionner la cellule à la date du jour

heru13

XLDnaute Nouveau

Pièces jointes

Phil69970

XLDnaute Barbatruc

heru13

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Pièces jointes

heru13

XLDnaute Nouveau

Pièces jointes

Discussions similaires