Filtre avec une valeur par rapport a une cellule

Bonjour,
Si tu déclares ta variable en STRING --> C’est du texte, donc pas de format de valeur

Sub filtre()
    Dim str As String
    str = Sheets("feuil1").Range("g2").Text
    ActiveSheet.ListObjects("Ta").Range.AutoFilter Field:=7, Criteria1:=str
End Sub
1 « J'aime »