compter le nombre de lignes d'un fichier Excel

Question

J'essaie de faire une fonction qui compte le nombre le ligne d'un fichier Excel qui à 51 colonnes.
mon prog ressemble à ça, mais ya un pb au niveau du Votre texte ici
erreur = l'entrée dépasse la fin du fichier

Open fich For Input As f
Do While EOF(f) = False
    nb = nb + 1
    For i = 1 To 51
        Input #f, Votre texte ici  
    Next i
Loop

Merci

coco_rine · Answer

Désolé, petite erreur de ma part!! je rectifie le tir et ça donne :

J'essaie de faire une fonction qui compte le nombre le ligne d'un fichier Excel qui à 51 colonnes.

mon prog ressemble à ça, mais ya un pb au niveau du tableau 
erreur = l'entrée dépasse la fin du fichier

Open fich For Input As f
Do While EOF(f) = False
nb = nb + 1
For i = 1 To 51
Input #f, T(i) 
Next i
Loop

rvw68 · Answer

Salut

En VBA c'est :

ActiveSheet.UsedRange.Rows.count 
si tu n'a pas de filtres ou que tu veux toutes les lignes malgré les filtres

ou

Application.Subtotal(3, [A:A]) - 1
Pour n'avoir que les lignes affichées.

Bonne chance

coco_rine · Answer

Eh ben merci bien ça marche!!
dire que je me galère à faire des trucs compliqués alors qu'il y en a qui connaissent des trucs hyper simples

Bye

Compter le nombre de lignes d'un fichier Excel

3 réponses

Discussions similaires