Compter et inscrire résutat dans une cellule

[aubelix]

Bonjour à tous les amis du Forum. 🙂

Tout d'abord bonnes vacances au heureux aoûtiens et
bons courage pour ceux qui reprennent ainsi qu'à ceux
qui comme moi travaillent...

Mon problème est les suivant:
J'importe des SN dans la feuille BASE. Les quantités sont
variables d'une importation à une autre.
Les données sont toujours copiées de B2 à Bx.
Comment après avoir importé les donnnées, les compter
et écrire le résultat dans la cellule D2.

Par avance, Merci pour votre aide.
Cordialement.

 

[kjin]

Re : Compter et inscrire résutat dans une cellule

Bonjour,
Comprends pas trop ton pb...
Soit en D2

=NBVAL(B:B)-1

soit en VBA

Range("D2") = Application.CountA(Columns(2)) - 1

A+
kjin

 

[aubelix]

Re : Compter et inscrire résutat dans une cellule

Bonjour carcharodon-carcharias et kjin

Merci pour vos réponses respectives.
carcharodon-carcharias ta solution VBA fonctionne bien
et je l'ai comprise...
Par contre, kjin pourrais-tu m'expliquer la tienne.

Par avance, Merci.
Cordialement.