accès première cellule après un champ dans un filtre automatique

[Adé]

Comment par une macro passer d'un champ à la première cellule visible d'un filtre automatique?
Exemple ci-joint.
Merci pour votre aide

 

[JCGL]

Re : accès première cellule après un champ dans un filtre automatique

Bonjour à tous,

Pas tout compris à la question...

En formule pour avoir la première valeur du filtre :

en C1 :

=INDEX(B1:B3000;MIN(SI(SOUS.TOTAL(3;DECALER(B1;LIGNE(B1:B3000);));LIGNE(B2:B3000)));1)

Formule matricielle...

En VB : avis aux amateurs 😛

A+

 

[Cousinhub]

Re : accès première cellule après un champ dans un filtre automatique

Bonjour, essaie ce code :

Sub trouve_prem_cel()
Dim c As Range
For Each c In Range("_filterdatabase").Offset(1, 0).Resize(, 1)
If c.EntireRow.Hidden = False Then
c.Select
Exit Sub 'ou ton code si tu veux parcourir toute la base filtrée
End If
Next c
End Sub

 

[Adé]

Re : accès première cellule après un champ dans un filtre automatique

Merci, apparemment ca fonctionne. BRAVO!
Grande ouverture!
Je repars dans mes macros sous le soleil accablant du midi....