1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6

Compter nombre de lignes non vides dans une colonne excel [Résolu]

Signaler
Messages postés
20
Date d'inscription
jeudi 11 novembre 2004
Statut
Membre
Dernière intervention
27 janvier 2008
 -
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
 -
Bonjours à tous !

Une question en VBA de débutant :

Dans Excel, à partir d'une certaine case que je connais (disons A3) j'ai un nom sur chaque ligne. 
J'aimerai savoir comme faire en VBA pour compter le nombre de noms de ma liste ( cela revient à connaitre le nombre de lignes non vides de la colonne A à partir de la case A3)

Une idée ? Je me suis embrouillé avec les count, range etc  

Merci
@+
Afficher la suite

7 réponses

Réponse 1 / 7
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
 18
Salut,

avec CountA, et la plage en paramètres, tu peux connaitre ce nombre :

MsgBox Application.WorksheetFunction.CountA(Range("A3:A65536"))

@++


  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
  
Réponse 2 / 7
Messages postés
20
Date d'inscription
jeudi 11 novembre 2004
Statut
Membre
Dernière intervention
27 janvier 2008
Merci beaucoup, ça m'a l'air de fonctionner !

Par contre,  juste pour comprendre, pourquoi :

Application.WorksheetFunction  --> ça représente quoi ?

CountA --> quelle différence par rapport à Count ?

Merci bcp mortalio

@+
Réponse 3 / 7
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
 18
WorksheetFunction.CountA,
c'est une méthode :
Compte le nombre de cellules
non vides, ainsi que les valeurs dans la liste d'arguments.

WorksheetFunction.Count,
c'est une méthode
Compte le nombre de cellules
contenant des nombres, ainsi que les nombres de la liste d'arguments.

@++


  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
  
Réponse 4 / 7
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
 18
désolé, ce qui suit y était, mais ne s'affiche pas ???   :

@++


  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
  
Réponse 5 / 7
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
 18
Bah tiens !! j'ecris des trucs, mais ça n'apparait pas ! bizarre...

Bref, WorkSheetFunction est une classe où est stocké toutes les fonctions que tu as dans Excel (les formules, style NB.SI, COS, etc..) mais accessibles donc depuis VB.
Chaque formule Excel à un équivalent en VB (c'est juste que c'est en anglais)

@++


  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
  
Réponse 6 / 7
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
 49
Salut,
Si problèle résolu, appuyer sur réponse acceptée sur le ou les post qui on pu aider.Merci

@+: Ju£i?n
Pensez: Réponse acceptée
Réponse 7 / 7
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
 18
Tu pourrais aussi l'écrire comme ceci
MsgBox [CountA(A3:A65536)]
un peu comme si c'était la formule anglaise inscrite dans la cellule...

MPi
Répondre Posez votre question