Microsoft 365 sélectionner la premiere ligne d'une liste filtrée par vba

[pascal21]

 ActiveSheet.Range("$J$7:$J$125").AutoFilter Field:=1, Criteria1:= _
        "brulure"

bonsoir à tous
ce code me permet de filtrer une liste par catégorie
il y a plusieurs catégories
comment sélectionner la première ligne filtrée par chaque macro?
parce que là ca me sélectionne le bas du tableau
merci

 

[ChTi160]

Bonsoir Pascal
je pense que tu dois savoir qu'un fichier exemple de ce que tu as et ce que tu veux est de rigueur , si tu veux espérer avoir une réponse !
rien que ça c'est imbuvable Lol

comment sélectionner la première ligne filtrée par chaque macro?
parce que là ca me sélectionne le bas du tableau

Bonne fin de Soirée
Jean marie

 

[sylvanu]

Bonsoir Pascal, ChTi,
Peut être comme ceci :

Si tableau structuré ( feuil1 )
Sub essai()
With ActiveSheet.Range("Tableau1")
    .AutoFilter Field:=1, Criteria1:="brulure"
    .SpecialCells(xlVisible).Rows(1).Select
End With
End Sub
Si simple plage ( feuil2 )
Sub essai2()
ActiveSheet.Range("J7:L126").AutoFilter Field:=1, Criteria1:="brulure"
L = ActiveSheet.Range("J8:L126").SpecialCells(xlCellTypeVisible).Row
Range("J" & L & ":L" & L).Select
End Sub