Liste entre 2 Dates

Bonjour à tous;

Je vous adresse mon classeur en pièce jointe pour qu'on puisse m'aider à filtrer le tableau entre deux date de lancement

Merci à tous et Bon courage

Bonjour,

Un essai par macro, l'affichage se recalcule sur saisie de la date de fin. Pour réafficher tout le tableau, mettre la date de fin à vide.

Cordialement,

edit : correction du fichier, oublie de modifier mes tests en enlevant les = des <= et >=.

Bonjour à tous,

Avec un filtre

Sub FiltreDate()
Dim Lg&
    Application.ScreenUpdating = False
        On Error Resume Next
        ActiveSheet.ShowAllData 'libère les filtres
        On Error GoTo 0
    Lg = Cells.Find("*", , , , xlByRows, xlPrevious).Row
    Range("q2") = "=AND(f6>=$c$2,f6<=$c$3)" 'critères
    Range("a5:o" & Lg).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Range("q1:q2"), Unique:=False
    Range("q2").ClearContents
    Application.Goto Range("a6"), Scroll:=True
End Sub

Amicalement

Claude

bonjour

une autre solution sans vba en feuille 2 ( en dur) les plages seront donc a adapter seul avantage :tu pourras (eventuellement ) utiliser plus de fonctions que la seule autorisée dans les filtres : sous total

48hosni-5.zip (19.44 Ko)

cordialement

Salut Tous

je remercie ceux qui ont vite répondu à mon message, j'ai trouvé une diversité dans leur solution et par conséquent de nouvelles choses à apprendre, Merci encore et à plus.

Hosni

Rechercher des sujets similaires à "liste entre dates"