Sélectionner la cellule visible en dessous de la ligne des filtres

Bonjour à tous,

J'ai une table de données sur laquelle j'ai filtré la colonne A (le filtre se trouve en A3)

Après filtrage, j'aimerais pouvoir sélectionner la première cellule visible en colonne H en dessous de la ligne 3 (qui est ma ligne d'en-têtes avec les filtres).

Voici mon code qui ne marche pas...

With wsSource
    On Error Resume Next
    .ShowAllData
    Err.Clear
    .Range("A3").AutoFilter Field:=1, Criteria1:="*" & numero & "*"
    .Range("H3").SpecialCells(xlCellTypeVisible).Offset(1, 0).Select
End With

Je vous remercie par avance pour votre aide !

Bonjour,

Après avoir cherché sur un forum j'ai trouvé un code qui répond à ma demande, je me permets de le partager si ça peut en aider d'autres :

With ActiveCell
    With .Offset(1, 0).Resize(Rows.Count - .Row, 1)
        .SpecialCells(xlCellTypeVisible).Cells(1, 1).Select
    End With
End With

A bientôt !