NbVal en macro

Bonjour,

j'ai trouvé sur google

[a1] = Application.CountA([BL2:BL65536])

mais ça ne marche pas dans mon cas

j'aurais aimé faire en Macro ça =Nbval(BL2:BL65536)

T2F.Cells("BL", 1) = Application.CountA([BL2:BL65536])

est ce que vous sauriez faire ?

Bonjour,

Teste avec

Application.WorksheetFunction.CountA(Range("...."'))

Marche pas non plus , ou en tout cas je n'ai pas réussi a le faire marcher mais j'ai fait une boucle qui compte les cases contenant ok, ce qui revient au même dans mon cas.

Merci bien quand même

Et encore plus simple :

T2F.Range("BM1").Value = Application.CountIf(Columns(64), "OK")

Re,

Il faut savoir:

CountA = NbVal

CountIf = Nb.Si

S'il n'y a pas au départ dans la demande ce que l'on désire , on ne "COUNTPLUS"

Dans ma colonne j'ai soit des "ok" soit rien

Quand je compte dans la feuille de calcul je fais nbval (BL) et ça me donne le resultat que je veux

mais comme le countA je n'ai pas reussi à le faire fonctionner j'ai changé d'optique bien désolé de t'avoir embetté pour pas grand chose