Recherche d'une ligne vide

[perenthian]

Bonjour,

j'ai un tableau qui ressemble a cela :
edit
xx
xx xx
vide xx
xx xx
xx xx
xx
vide xx (<- numéro de la ligne recherchée)

et je veux connaître la dernière ligne ou il y a une information, ou la première vide. Je me suis inspiré d'un précédant code que j'avais fait pour une colonne, mais cela ne fonctionne pas et je ne vois pas pourquoi :

Range("A" & i, "B" & i).Select
    Do While Not (IsEmpty(ActiveCell))
    Line = Line + 1
    Selection.Offset(1, 0).Select
Loop

Merci

 

[WUTED]

Re : Recherche d'une ligne vide

Bonjour perenthian,

Range("A65536").End(xlUp).Row

Te renvoit un entier correspondant au numéro de la ligne de la dernière cellule non-vide dans le colonne A.

Bonne journée.

 

[perenthian]

Re : Recherche d'une ligne vide

Et le "A65536", ça provient d’où ?

 

[perenthian]

Re : Recherche d'une ligne vide

Et je m’aperçois que les espaces n'ont pas été pris en compte dans message initial...

Est ce que ta ligne de commande marche s'il y a un blanc au milieu de la colonne A ?

 

[WUTED]

Re : Recherche d'une ligne vide

Oui, car cela revient à partir de la cellule "A65536" et remonter toute la feuille, si la cellule est non-vide, la fonction End s'arrête. Y'a un peu plus d'infos ici.

 

[perenthian]

Re : Recherche d'une ligne vide

Ok en fait, mon fichier contient 135 051 lignes donc ca ne marchera pas ?

Du coup, selon ton lien, Range("A1048576").End(xlUp).Row semblent fonctionner. J'ai peur que cela soit long par contre...