Erreur de compilation CountIf
Bonjour,
Je suis débutant en programmation vba. Dans un code que j'écris actuellement, je souhaite saisir dans une cellule la valeur du nombre de cellules contenant une valeur dans la colonne K jusqu'à la dernière ligne non vide.
Lorsque je tape la ligne suivante, il me met "erreur de compilation, séparateur de liste ou ) attendu" après K11.
[K2] = WorksheetFunction.CountIf(K11:K"&[h65536].End(xlUp).Row&","=" & "*")
Je ne comprends pas pourquoi.
Quelqu'un aurait-il une idée ?
bonjour,
si tu veux compter les cases non vides utilise plutôt CountA,
[K2] = WorksheetFunction.Counta("K11:K"&[h65536].End(xlUp).Row)Bonjour Flyman et bienvenue sur le forum
Bonjour à tous
Pour compléter h2so4, si tu veux compter les données qui commencent par "&" tu as :
[K2] = WorksheetFunction.CountIf(Range("K11:K" & [K65536].End(xlUp).Row), "&*")Bye !
Bonjour à vous deux,
Merci de votre aide.
Après essai, je n'ai plus d'erreur mais il me met "1" dans la cellule alors que j'ai 19 lignes saisies dans le fichier.
Je précise également que dans la colonne, de K11 jusqu'à la dernière ligne saisie, je n'ai que des valeurs 1,2,3 ou 4.
Je ne sais pas si ça à son importance mais bon...
h2so4 a écrit :bonjour,
si tu veux compter les cases non vides utilise plutôt CountA,
[K2] = WorksheetFunction.Counta("K11:K"&[h65536].End(xlUp).Row)
es-tu sûr que c'est par rapport à la colonne H qu'il faut déterminer la fin de la plage K11:Kx ?
Deux questions :
Qu'as-tu dans ces 19 lignes ? Et que veux-tu y compter ?
Bye !
h2so4 a écrit :h2so4 a écrit :bonjour,
si tu veux compter les cases non vides utilise plutôt CountA,
[K2] = WorksheetFunction.Counta("K11:K"&[h65536].End(xlUp).Row)es-tu sûr que c'est par rapport à la colonne H qu'il faut déterminer la fin de la plage K11:Kx ?
On peut rester dans K, mais comme je pars d'un fichier csv à la base que je mets en forme via ma macro, lorsque j'ai quelque chose en K, j'ai forcément quelque chose en H.
gmb a écrit :Deux questions :
Qu'as-tu dans ces 19 lignes ? Et que veux-tu y compter ?
Bye !
Dans la colonne K, à partir de K11 et jusqu'à la dernière ligne qui est variable, j'ai 4 valeurs possibles (1,2,3 ou 4).
Je souhaite affiché en K2, le nombre total de ligne. A la limite, je peux même simplement affiché le nombre de lignes non vides à partir de la ligne 11.
Essaie la formule de h2so4 :
[K2] = WorksheetFunction.CountA(Range("K11:K" & [K65536].End(xlUp).Row))
Bye !
gmb a écrit :Essaie la formule de h2so4 :
[K2] = WorksheetFunction.CountA(Range("K11:K" & [K65536].End(xlUp).Row))
Bye !
il manquait le range(, j'ai répondu trop vite, merci gmb pour la correction !
Merci pour votre aide mais cela ne marchait pas.
J'ai finalement trouvé mais je dois passer par le déplacement ligne colonne dans ma macro, sinon il me jette à chaque fois après les : dans le Range du CountIf.
Et pour valider n'importe quel type de donnée dans les cellules de la colonne, l'argument de CountIf à apporter est : "<>"
Du coup, ma ligne de code devient :
Range("K2").Select
ActiveCell.FormulaR1C1 = "=COUNTIF(R[9]C:R[754]C,""<>"")"
Bye