trouver la dernière ligne d'une colonne

[fifayer]

Bonjour, voici ma première formule VBA dont je ne suis pas peut fier... (en fait c'est une modification d'un code trouvé sur ce forum.

Originale :
Der_Col = Range("IV1").End(xlToLeft).Column

Modofiée :
Der_Lign = Range("A65536").End(xlUp).Row

En espérant que cela serve à quelqu'un...

A bientoto ! 😛

 

[Cousinhub]

Re : trouver la dernière ligne d'une colonne

Bonjour,
et bravo pour ce premier code
Attention toutefois, il est parfois nécessaire de déterminer l'onglet dans ton code, car tu peux travailler sur une feuille, et écrire sur une autre
Ton code pourrait alors devenir :

Der_Lign = Sheets("Feuil2").Range("A65536").End(xlUp).Row

si tu veux copier des données de la feuille 1 vers la feuille 2, dans la dernière ligne de celle-ci
PS, dans ce cas, n'oublie pas de rajouter +1 pour ne pas écrire dans cette dernière ligne

Der_Lign = Sheets("Feuil2").Range("A65536").End(xlUp).Row [COLOR="Red"]+ 1[/COLOR]