Problème macro - filtre avancer selon date

Bonjour,

J'ai un problème (oui c'est le but du forum )

Je souhaiterais pouvoir masquer les personnes (lignes) dont la date de naissance (colonne C) est antérieure de 25ans par rapport à AUJOURD'HUI.

J'ai réussi à l'aide d'un filtre avancé. Mais le problème c'est au moment de le faire avec une macro (afin de le rentre automatique).

Lorsque j'enregistre la macro, aucun problème, le filtre avancé avec la zone (B6;R204) et le critère (N1;N2), fonctionne, mais lorsque j'exécute, la macro, elle ne laisse aucune casse visible.

J'imagine qu'il y a une astuce, ou un moyen de faire cette manœuvre plus facilement (tout en VBA?).

Pouvez-vous m'aider SvP

Merci beaucoup

17excel.xlsx (22.35 Ko)

Bonjour,

Je ne vois ni macro (.xlsx), ni filtre avancé dans ton fichier.

eric

Bonsoir lexture, bonsoir Eriiic, bonsoir le fil,

Eric, je pense que lexture souhaite seulement faire la différence entre deux dates et masquer les lignes concernées si celles-ci représentent plus de 25 ans de différence.

Je propose ce code à mettre dans la feuille:

Sub Test()
Dim L As Integer, DteNais As Date
L = 6
Do While Cells(L, "C") <> ""
    DteNais = Cells(L, "c").Value
    If CLng(Date) - CLng(DteNais) > 9132 Then '9132 représentant 25 ans
        Rows(L).EntireRow.Hidden = True
    End If
    L = L + 1
Loop
End Sub

cordialement

ddetp88

37ddetp-excel.xlsm (29.81 Ko)

Merci pour ta macro !! C'est parfait =)

A+

Rechercher des sujets similaires à "probleme macro filtre avancer date"