Boucle prendre derniere valeur Date

steph544 · 3 Juillet 2017

Bonjour la communauté

voila j'expose mon petitprobleme ^^. Grace à vous j'ai pu avoir un code qui permet de filtrer un tableau avec ls conditions qui nous interesse. Cependant pour avoir des valeurs exactes sur le tableau, il faut prendre uniquement la derniere valeur de la condition correspondant à la dernier date/ heure sur le tableau. LE code filter très bien et prend les valeurs quil faut à la condition enoncé. JE voudrais le filtrer en plus afin d'avoir la derniere valeur de la date correspondant.

Pour faire plus simple voici le fichier en piece jointe ou tout est expliqué.

Merci de votre aide.

Lolote83 · 3 Juillet 2017

Salut STEPH544,
Voici une réponse sur la feuille TEST qui utilise un filtre élaboré avec comme critère I1:J2
Une colonne supplémentaire MINUTE a été créée.
@+ Lolote83

steph544 · 3 Juillet 2017

MErci sa marche impeccable, je voudrais rajouter des critéres par exemple prendre les vitesses egale à 2 peux tu me dire comment rajouter celle ligne sur ton code car je ne vois pas merccii !!!!

Lolote83 · 3 Juillet 2017

Re salut,
On rajoute la condition en colonne K
et dans le code

Code:

Sub Filtre()
    Application.ScreenUpdating = False
    xDerLig = Sheets("TEST").Range("A65536").End(xlUp).Row
    With Sheets("TEST")
        Range("TEST!A5:F" & xDerLig).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=.Range("I1:K2"), CopyToRange:=.Range("I5:M5"), Unique:=True
    End With
    Application.ScreenUpdating = True
End Sub

Voir la condition CriteriaRange:=.Range("I1:K2")
@+Lolote83

steph544 · 5 Juillet 2017

MERCI !!!

Boucle prendre derniere valeur Date

steph544

Guest

Pièces jointes

Lolote83

XLDnaute Barbatruc

Pièces jointes

steph544

Guest

Lolote83

XLDnaute Barbatruc

Pièces jointes

steph544

Guest

Discussions similaires

Boucle prendre derniere valeur Date

steph544

Guest

Pièces jointes

Lolote83

XLDnaute Barbatruc

Pièces jointes

steph544

Guest

Lolote83

XLDnaute Barbatruc

Pièces jointes

steph544

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency