Application.CountA(range.....)

[Didou]

Bonjour à toutes et tous,

Je cherche des infos qui tournent autour de "Application.CountA ".
Des exemples ou des explications seraient les bienvenues.
A+
Didou

 

[sousou]

Effectivement une propriété inconnu pour moi et non décrite dans l'aide en ligne.

Les premiers tests me renvoient le nombre de cellule non vide d'un objet range.
par exemple:
n=application.counta(worksheet.usedrange)

Attendons, le forum nous apportera sans doûte d'autres infos!

 

[wally]

Bonsoir Didou et le forum,

C'est une autre façon d'écrire : Application.WorksheetFunction.CountA(...)

Il s'agit de l'équivalent - en VBA - de la fonction NBVAL(...) dans une feuille de calcul.


@+

wally

 

[Didou]

Bonjour le forum,

Merci wally pour le tuyau, mais mon niveau de connaissance Excel ne me permet pas de comprendre ton explication. (Il faut d'ailleurs que je corrige ma fiche de membre: niveau débutant me convient finalement à la lecture de certains articles; )

A+
Didou

 

[Didou]

Rebonjour

Aprés une recherche dans l'aide, la fonction NBVAL(sélection) compte le nombre de cellule non vide en fonction de la sélection.
Ci-dessous l'exemple fournit:

A1= Données
A2= Ventes
A3= 08.12.08
A4=
A5= 19
A6= 22.24
A7= VRAI
A8=
A9 #DIV/0!

B10= Formule=

=NBVAL(A2:A8) Compte le nombre de cellules non vides comprises dans la liste ci-dessus (6)
=NBVAL(A5:A8) Compte le nombre de cellules non vides comprises dans les 4 dernières lignes de la liste (4)
=NBVAL(A1:A7,2) Compte le nombre de cellules non vides comprises dans la liste ci-dessus et la valeur 2 (7)
=NBVAL(A1:A7,"Deux") Compte le nombre de cellules non vides comprises dans la liste ci-dessus et la valeur "Deux" (7)

Bon week-end à tous

Didou