XL 2021 pour information : Filtrer sur date

Usine à gaz

XLDnaute Barbatruc
Bonjour à toutes et à tous :)

J'ai cherché longtemps pour trouver comment filtrer sur un date...
Par exemple < à aujourdhui() ou > etc...
J'ai fini par trouver sur :
Voici le code :
VB:
Sub Test_filtre()
'developpez.net
ActiveSheet.Range("$A$1:$E$100").AutoFilter Field:=1, Criteria1:="<" & CLng(Date + 1), Operator:=xlAnd, Criteria2:="<" & CLng(Date + 1)
End Sub
Je pense que ça peut servir à beaucoup d'entre nous :)

D'ailleurs, il y a peut-être d'autres possibilités ?
Qu'en pensez-vous ?
Fichier test joint
:)
 

Pièces jointes

  • date filtre.xlsm
    18.6 KB · Affichages: 3

Discussions similaires

Réponses
8
Affichages
404
Réponses
2
Affichages
348

Statistiques des forums

Discussions
315 098
Messages
2 116 190
Membres
112 679
dernier inscrit
Yupanki