XL 2016 Dernière ligne d'une plage dynamique

[erictran]

Bonjour le forum,

Je voudrais faire une boucle "for each cell" d'une plage dynamique en nbre de lignes mais je n'arrive pas à définir le nombre de lignes de celle ci :

Ci-après screenshot de la plage sur laquelle je souhaite boucler :

j'ai essayé les deux codes suivants pour trouver la dernière ligne de cette plage:

Derlig2 = .Range("I2:L" & Rows.Count).End(xlUp).Row

Derlig3 = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row

Ensuite je définis la plage de recherche :

    Set maplage2 = Sheets("Filtres").Range("I2", Sheets("Filtres").Range("L" & Derlig2).End(xlUp))

Puis je fais la boucle "for each " sur les cellules de cette plage.. mais en l'état ca ne fonctionne pas car l'espion me donne des valeurs de la variable Derlig de 1 à chaque fois...

Bref j'aurai grand besoin de vos lumières!

Merci

Eric

 

[chris]

Bonjour

Utiliser Find plutôt qu'une boucle

 

[sylvanu]

Bonjour Eric, Chris,
Essayez :

Derlig4 = Range("I65500").End(xlUp).Row

cela vous donne la bonne valeur : 7

 

[erictran]

Sylvanu

Merci, mais je voudrais connaître la dernière ligne sur la plage de colonnes "I:L" . Dans mon exemple , il y a plus de lignes en colonne K qu'en colonne I

Ou alors je le fais sur chaque colonne et je prends la plus grande valeur ?

 

[sylvanu]

Oups! Je n'avais pas saisi ce que vous vouliez faire.
Essayez :

Derlig5 = Range("I1").CurrentRegion.Rows.Count

Ce qui dans votre tableau donne bien 13 correspondant à la colonne K.
Attention cependant, CurrentRegion s'arrête à la première colonne et première ligne vides. Donc cela suppose que la colonne M soit vide sinon elle entrera en ligne de compte.

 

[erictran]

Merci pour votre réponse, cela fonctionne!