Sélection d'une cellule après un filtre ?

[derin]

Bonjour,

Je voudrait savoir si il est possible de sélectionner une cellule après avoir applique un filtre, pour être plus précis, j'aurais besoin que la macro puisse selectionner dans la colonne A la troisième cellule visible après le filtre (qui peut donc avoir n'importe quel numéro), j'ai fait plusieurs essais, mais rien ne fonctionne.

Merci d'avance Derin

[neupont]

Salut,
voilà un petit exemple à adapter :

For Each c In Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible)
   ...traitement
Next

[fring]

Bonjour,

Une autre solution possible (en supposant le filtre appliqué à la colonne A)

Sub test()
Dim i As Integer, x As Byte
 
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
    If Rows(i).Hidden = False Then
        x = x + 1
        If x = 3 Then
            Cells(i, 1).Select
            Exit For
        End If
    End If
Next
End Sub

[derin]

Voila j'ai tester, par contre j'ai pris la seconde solution (je la comprend mieux et donc si besoin d'apdapter ...).
Sa fonctionne nikel
thx