Vba et affichage de dates

Fermé
antolix Messages postés 7 Date d'inscription mardi 17 mars 2015 Statut Membre Dernière intervention 18 mars 2015 - Modifié par antolix le 18/03/2015 à 11:19
antolix Messages postés 7 Date d'inscription mardi 17 mars 2015 Statut Membre Dernière intervention 18 mars 2015 - 18 mars 2015 à 14:00
Bonjour,
Je souhaiterai, qu'en cliquant sur un bouton vba, toutes les lignes où une cellule contient une date dépassée soient filtrées.
De même, avec un autre bouton, toutes les lignes où une cellule a une date qui est dans moins de 6 mois.
Puis, avec un troisième bouton, toutes les lignes où une cellule contient une date de l'année en cours.
Merci



2 réponses

Patty5083 Messages postés 34 Date d'inscription lundi 14 avril 2014 Statut Membre Dernière intervention 10 novembre 2019
18 mars 2015 à 12:05
Bonjour
pour tester la date dépassée
si ta date est en A7

If Range("A7").Value < Date Then
MsgBox Range("A7").Value
End If



pour savoir si moins de 6 mois

If Range("A7").Value < Date And Range("A7").Value > DateSerial(Year(Date), Month(Date) - 6, Left(Date, 2)) Then
MsgBox Range("A7").Value
End If



savoir si année en cours :

If Right(Range("A7").Value, 4) = Right(Date, 4) Then
MsgBox Range("A7").Value
End If



A toi de mettre en forme pour tes boucles
Bon courage
0
antolix Messages postés 7 Date d'inscription mardi 17 mars 2015 Statut Membre Dernière intervention 18 mars 2015
18 mars 2015 à 14:00
Merci Patty pour tenter de m'aider !
J'ai collé tes formules dans les macros affectées à mes "boutons vba" mais quand je clique dessus, rien ne se passe ! ça ne me sélectionne pas les lignes souhaitées.
De plus il semble qu'il y ait une erreur de syntaxe dans la formule moins de 6 mois.
Quant aux boucles dont tu me parles je ne sais pas ce que c'est ...
0