countif problématique

  • Initiateur de la discussion Initiateur de la discussion Edouard
  • 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 !

E

Edouard

Guest
Bonjour le forum,
j'ai un problème qui ne date pas d'hier, il y a qq chose qui m'échappe en VB.

Tout ce que je veux faire, c'est mettre dans une variable NbCom le résultat d'un CountIf... Jusqu'ici, je mettais en fait le countif dans une cellule, et je récupérais la valeur.

J'ose croire qu'il est possible de faire ce genre d'opération sans encombrer mes cellules de formules !!!

Seulement voilà, j'ai une erreur d'objet manquant à la ligne

NbCom = application.worksheetfunction.countif( MaZone, LaCom)

avec le debugger, je sais voir que MaZone et LaCom sont corrects.

Mais comment faire alors ?

Est-ce que la variable doit être spéciale ?
Est-ce qu'il faut obligatoirement déclarer un objet (lequel?, et dont je ne saurais quoi faire) ?
Est-ce que je m'y prends vraiment mal ???

merci de m'éclairer
 
Bonjour Edouard et le forum,

MaZone doit être un objet de type "Range". Il faut donc lui affecter une valeur à l'aide de l'instruction Set.

Voici un petit exemple permettant de compter le nombre d'apparitions de "Toto" dans la colonne A de la feuille "Feuil1" :

Dim MaZone As Range
Dim LaCom As String
Dim NbCom As Integer

Set MaZone = Worksheets("Feuil1").Range("A:A")
LaCom = "Toto"

NbCom = Application.WorksheetFunction.CountIf(MaZone, LaCom)


Slts

wally
 
Merci Wally,

je vais essayer de ce pas, d'autant plus que dans l'aide, j'a effectivement vu qu'il semble falloir un Set.
Je ne savais pas quoi "Setter", je m'en étais donc abstenu...

Je dirai si ça résout mon problème...
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Retour