Se rendre a la date du jour

[maval]

Bonjour

J'aimerai a l'aide d'un bouton sur ma feuille me rendre a la date du jour situer dans la colonne "A"

D'avance merci à qui pourra m'aider.
Cordialement

Maval

 

[DoubleZero]

Re : Se rendre a la date du jour

Bonjour, maval, le Forum,

Une possibilité :

Sub Date_atteindre()
Sheets("Feuil1").Columns(1).Find(Date).Select
End Sub

A bientôt 🙂🙂

 

[maval]

Re : Se rendre a la date du jour

Bonjour Double zero,

Et merci, Y a t-il possibilité de masquer les dates au-dessus

Bonne soirée

Maval

 

[DoubleZero]

Re : Se rendre a la date du jour

Re-bonjour,

... Y a t-il possibilité de masquer les dates au-dessus...

Une nouvelle possibilité :

Sub Date_atteindre_bis()
Sheets("Feuil1").Columns(1).Find(Date).Select
Selection.Name = "aujourdhui"
Range("a3:aujourdhui").Offset(-1, 0).EntireRow.Hidden = True
ActiveWorkbook.Names("aujourdhui").Delete
End Sub

A bientôt 🙂🙂

 

[maval]

Re : Se rendre a la date du jour

Re,

Génial et se qui serai encore plus genial si cela n'est pas trop abuser avoir la possibilité de ré afficher les cellules masquer

Merci encore et bonne soirée


Cordialement

Maval

 

[DoubleZero]

Re : Se rendre a la date du jour

Re-bonjour,

Une nouvelle suggestion dans le fichier joint.

A bientôt 🙂🙂

 

[maval]

Re : Se rendre a la date du jour

Bonjour

Je te remercie beaucoup exactement la recherche.

Bonne journée et merci encore

Cordialement

Maval