Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Selectionner une colonne sur la date du jour actuelle

hassan.zer

XLDnaute Occasionnel
Bonjour à tous,

J'ai un calendrier horizontal avec la date, je voudrai une macro pour selectionner la colonne contenat la date du jour, j'ai deja ce fichier mais cela ne fonctionne pas, cela ne tient pas compte du mois !

Merci
 

Pièces jointes

  • Ouverture sur Date Jour.xls
    37.5 KB · Affichages: 111
  • Ouverture sur Date Jour.xls
    37.5 KB · Affichages: 126
  • Ouverture sur Date Jour.xls
    37.5 KB · Affichages: 118

Papou-net

XLDnaute Barbatruc
Re : Selectionner une colonne sur la date du jour actuelle

Bonsoir hassan.zer,

En modifiant ta macro comme suit, ça fonctionne (et ce quelle que soit l'année) :

Code:
Sub azerty()
For Each cel In Feuil10.Range("3:3").SpecialCells(xlCellTypeConstants)
  If Day(cel.Value) = Day(Date) And Month(cel.Value) = Month(Date) Then
    cel.Select
    Exit Sub
  End If
Next
End Sub

Espérant avoir répondu.

Cordialement.
 

orphelion

XLDnaute Occasionnel
Re : Selectionner une colonne sur la date du jour actuelle

Bonjour le forum, le fil

Papou-net c'est super cette petite macro.
Je me permet de rajouter la precision de l'annee si besoin etait.

Code:
Sub azerty()
For Each cel In Feuil10.Range("3:3").SpecialCells(xlCellTypeConstants)
  If Day(cel.Value) = Day(Date) And Month(cel.Value) = Month(Date) And Year(cel.Value) = Year(Date) Then
    cel.Select
    Exit Sub
  End If
Next
End Sub

A+
 

Discussions similaires

Réponses
8
Affichages
244
Réponses
5
Affichages
198
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…