Bonjour,


Je cherche a récupérer la plage corresspondant aux résultats trouvé lors d'un filtre...

J'ai écrit ce code, ...mais il me récupère toute la zone triée.. mois je souhaite juste la zone des résultats

Help


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Sub ChangeFilters()
 
    Dim currentFiltrange As String
 
    Sheets(1).Range("A1").AutoFilter field:=5, Criteria1:="5"
 
    With Sheets(1).AutoFilter
        currentFiltrange = .Range.Address
    End With
 
    MsgBox currentFiltrange
 
End Sub
merci

Dams'