Se rendre a la date du jour

DoubleZero

XLDnaute Barbatruc

• 20 Septembre 2012

• #2

Re : Se rendre a la date du jour

Bonjour, maval, le Forum,

Une possibilité :

Code:

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

A bientôt 🙂🙂

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 20 Septembre 2012

• #3

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

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 20 Septembre 2012

• #4

Re : Se rendre a la date du jour

Re-bonjour,

maval à dit:

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

Cliquez pour agrandir...

Une nouvelle possibilité :

Code:

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 🙂🙂

 

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 20 Septembre 2012

• #5

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

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 20 Septembre 2012

• #6

Re : Se rendre a la date du jour

Re-bonjour,

Une nouvelle suggestion dans le fichier joint.

A bientôt 🙂🙂

 

Pièces jointes

• 00 - maval - lignes afficher-masquer.xlsm

  19.2 KB · Affichages: 51

Vote positif 0 Vote négatif

maval

XLDnaute Barbatruc

• 21 Septembre 2012

• #7

Re : Se rendre a la date du jour

Bonjour

Je te remercie beaucoup exactement la recherche.

Bonne journée et merci encore

Cordialement

Maval

 

Vote positif 0 Vote négatif