Calcul du nombre de ligne dans un tableau

  • Initiateur de la discussion Initiateur de la discussion Bradvid
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Re : Calcul du nombre de ligne dans un tableau

salut,
voilà le code que j'utilise, quand je sais que la colonne A est toujours remplie à chaque enregistrement :

Code:
DerniereLigne = Application.WorksheetFunction.CountA(Range("A:A"))
, en fait ca compte le nombre de lignes utilisées dans la colonne A

@+
 
Re : Calcul du nombre de ligne dans un tableau

Salut Chloulou,

Merci pour ton retour, c'est tout à fait cela.
Petite question, je cherche via une macro attachée à un bouton dans un fichier aller chercher des cellules spécifiques dans un autre fichier (pas forcément placé dans le même répertoire) sais-tu comment faire?

Merci encore
 
Re : Calcul du nombre de ligne dans un tableau

Pour ta deuxième question, il y a des sujets la-dessus, utilise lRecherche,
car ca dépend si tu veux ouvrir ou pas le deuxième classeur
Si il est ouvert: il faut juste spécifier l'adresse des cellules du type :
Code:
Worbooks("Ton classeur").Worksheets("Ta feuille").cells(Ligne, Colonne)

Sinon pour la dernière ligne, il y a d'autres solutions :
Code:
PremLigne = Range("A1").end(xldown).row
DerLigne = Range("A65500").end(xlup).row
NbLignes = DerLigne-PremLigne+1

ou

DerLigne = Range("A" & Application.rows.count)..end(xlup).row
 
Dernière édition:
Re : Calcul du nombre de ligne dans un tableau

Attention, si, comme cela est fréquent, hélas, les titres sont fusionnés verticalement, et admettons les cellules A1 à A4 fusionnées, ta solution ne donnera pas la bonne valeur.
avec 10 cellules remplies sous les titres :
DerniereLigne = Application.WorksheetFunction.CountA(Range("A:A"))=11
derlig = [a65000].End(xlUp).Row =14 (remarque, s'il n'y a que les titres, celle-ci non plus)
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
512
Réponses
10
Affichages
409
Réponses
19
Affichages
760
Réponses
2
Affichages
240
Réponses
18
Affichages
607
Retour