VBA - Filtrer sur N dernieres lignes

Bonjour,

Je souhaiterai faire des coefficients de corrélations entre des données de différents Excel sur la dernière année,

Cependant, après avoir codé l'ensemble des extractions et réalisé un filtre sur les données de l'année dernière à ce jour, certaines de mes données n'ont pas le même nombre de lignes, ce qui pose problème pour réaliser le coefficient de corrélation.

Je souhaitais savoir si je pouvais réaliser sur VBA un filtre par exemple sur les 260 dernières lignes, et comment faire ?

Ou alors que VBA compte les lignes de chacun des classeurs (après le filtrage 1 an) et filtre a nouveau avec le plus petit nombre de ligne trouvé sur un des fichiers.

Voilà, j'espère que vous pourrez m'aider

Merci par avance

Bonjour et bienvenue,

Merci de joindre un fichier à ta demande pour une aide adaptée du forum.

Cdlt.

Bonjour

Il manque beaucoup d'info, tu devrais préciser combien tu as de fichier, les mettre en PJ pour pouvoir connaitre la structure de tes fichiers, etc...

En tout cas, en fonction de ce que tu partages, voilà une piste pour récupérer le plus petit nombre de ligne de 3 fichiers

Sub CompterLignes()
Dim WB1SH As Worksheet
Dim WB2SH As Worksheet
Dim WB3SH As Worksheet

Dim NbLig As String
Dim NbLig2 As Integer
Dim NbLig3 As Integer

Dim temp As String
Dim ValMin As Integer
Dim i As Integer
Dim Tbl

Set WB1SH = Workbooks("Classeur1").Worksheets("La Feuille")
Set WB2SH = Workbooks("Classeur2").Worksheets("La Feuille")
Set WB3SH = Workbooks("Classeur3").Worksheets("La Feuille")

NbLig1 = WB1SH.Range("A" & WB1SH.Rows.Count).End(xlUp).Row
NbLig2 = WB1SH.Range("A" & WB2SH.Rows.Count).End(xlUp).Row
NbLig3 = WB1SH.Range("A" & WB3SH.Rows.Count).End(xlUp).Row

temp = NbLig1 & "-" & NbLig2 & "-" & NbLig3
Tbl = Split(temp, "-")

ValMin = 1048576
For i = LBound(Tbl) To UBound(Tbl)
    If Tbl(i) < ValMin Then ValMin = Tbl(i)
Next i

MsgBox ValMin

End Sub