Calcul de nombre de ligne

Bonjour,

tout d'abord merci à tous ceux qui prendront le temps de lire mon post et d'essayer de m'aider.

Mon problème est tout simple (je crois) : je voudrais calculer le nombre de lignes sur mon fichier exell.

je pense que je dois le faire via une boucle while (tant que la cellule n'est pas vide, j incrémente mon compteur :

ci dessous le début de mon code, mais celà ne fonctionne pas, je ne suis pas très douée en VBA je pense que la syntaxe n'est pas très juste

Dim i As Integer

i = 0

Cells(1, 1).Select

While ActiveCell.Value <> ""

i = i + 1

Cells(1, "i" + 1).Select

Wend

merci d'avance !!

Lila

Bonsoir,

Un exemple (parmi d'autres) de recherche du numéro de la dernière ligne renseignée en colonne A.

Sub test()
Dim DerLig As Long
    With ThisWorkbook.Worksheets("Feuil1")
        DerLig = .Range("A" & Rows.Count).End(xlUp).Row
    End With
End Sub

A+