parcourir selection sur données filtrées

[Gégé]

bjr,
j'ai une feuille excel dont les données sont filtrés (critère dans filtre automatique)
je selectionne un ensembbe de lignes; comment ne parcourir que les lignes sélectionnée, en vue d'un traitement ?
merci

 

[MichelXld]

bonjour

cet exemple permet de boucler uniquement sur les lignes visibles de la plage A1:A10

Dim Plage As Range, Cell As Range
Set Plage = Range('A1:A10').SpecialCells(xlVisible)

For Each Cell In Plage
MsgBox Cell.Row
Next Cell


bonne soirée
MichelXld

 

[gégé]

Je te remercie pour ta réponse qui répond en partie à ma question, grace à la fonction SpecialCells. Car dans ton exemple, tu connais déjà la plage Range('A1:A10')

Lorsque tu filtres une feuille, y a t-il des fonctions ou des constantes Excel pour connaitre le row de la 1er et de la derniere ligne ?

merci

 

[MichelXld]

bonjour Gégé

si la derniere ligne est variable , tu peux adapter la procedure :

dans cet exemple , Range('A65536').End(xlUp).Row permet de récupérer le numero de la derniere ligne non vide dans la colonne A , en partant du bas

Dim Plage As Range, Cell As Range
Dim I As Integer

I = Range('A65536').End(xlUp).Row
Set Plage = Range('A2:A' & I).SpecialCells(xlVisible)

For Each Cell In Plage
MsgBox Cell.Row
Next Cell


bonne soirée
MichelXld

 

[Gégé]

Salut MichelXld,
je te remercie pour tes infos, c'est exactement ce que je voulais.
J'ai plein d'autres questions qui ne sont pas en rapport avec ce post. Je laisserai donc d'autres messages bientot
merci encore !