[VBA-E] probleme avec la fonction countif

Bonjour

Je suis nouveau, j'espère que je place ma question au bon endroit.

Je voudrais utiliser la fonction countif (voir ce que j'ai fais ci-dessous) en allant rechercher des mots dans un tableau mais en respectant la casse... or je ne sais pas faire.

Quelqu'un peut il m'aider.... Merci !

Code:

---

1 2 3 4 5 6 7

For item = 1 To (i - 2) valeurachercher = Feuil5.Range("B" & (3 + incrément)).FormulaR1C1   For numérosalarié = 1 To compteurnoms 'janvier résultat = Application.CountIf(Feuil5.Range("janv" & numérosalarié), valeurachercher) Feuil5.Range("D" & (numérosalarié + numéroligne + incrément)).FormulaR1C1 = résultat * 0.25

---

Balises Code /Code ajoutées par ouskel'n'or

Bonjour adamm,
Bienvenue sur le forum. Tu es sur le bon...
"countif", connais pas, sans doute un pb de version. Néanmoins, et déjà, au lieu de

Citation:

---

Feuil5.Range("D" & (numérosalarié + numéroligne + incrément)).FormulaR1C1 = résultat * 0.25

---

Mets déjà

Code:

---

Feuil5.Range("D" & (numérosalarié + numéroligne + incrément)).Formula = résultat * 0.25

---

FormulaR1C1 est utilisé si tu mets une formule, non une valeur

Pour countif, "quelqu'un" va s'occuper de toi...

Bonne chance


NB - Tu devrais lire les règles du forum, elles t'apprennent plein de choses utiles pour tes recherches

salut adamm

la fonction countif va rechercher en respectant la casse la valeur à chercher

ici je cherche la casse de Adamm dans la colonne A

Code:

---

1 2 3 4 5

Sub RechercheNbOccurence() ValeurAChercher = "Adamm" Résultat = Application.CountIf(Range("A:A"), ValeurAChercher) MsgBox ("Le texte " & ValeurAChercher & " est présent : " & Résultat & " fois.") End Sub

---

je ne vois pas ou est le problème dans ton code
Que represente

Code:

---

Feuil5.Range("janv" & numérosalarié)

---

une cellule ou une plage de cellules
tu dis
à+

Tout d'abord merci pour vos réponses et vos conseil.

pour répondre à la question de bouley

Code:

---

Feuil5.Range("janv" & numérosalarié)

---

est une plage de cellule (mois de janvier) dans laquelle des personnes inscrivent au jour le jour leurs activités. Ma macro (je suis plus bricoleur qu'informaticien) permet en fin d'année de récupèrer toutes les activités (par extraction des 4 premières lettres) et totalise le temps passé. Mais je n'arrive pas à distinguer L (e de L (E par exemple....

que contient valeurachercher alors ?
les 4 lettres ?
Que contiennent les celulles de la colonne B ?
@+

Salut

ouskel' :
La fonction CountIf est la version langage VBA de la fonction NB.SI des formules Excel.

adamm :
1. Pour pouvoir utiliser les références d'objet Range dans une boucle utilise la propriété (ou l'objet, sais plus) Cell. Y'a pleins d'exemples sur le forum. Et y'a toujours l'aide de VBA pour les détails.
2. J'espère que tu ne mets pas de caractères accentués dans les noms de variables et que le code que tu nous a montré n'est qu'un dommy pour notre compréhension. Car le compilateur et les accents, ça fé pas vrémang bon ménageu, vé!

Citation:

---

Envoyé par bouley

que contient valeurachercher alors ?
les 4 lettres ?
Que contiennent les celulles de la colonne B ?
@+

---

Les cellules de la colone B contiennent les 4 lettres du mot à chercher dans la plage "janvier"

Citation:

---

Envoyé par zazaraignée

Salut

2. J'espère que tu ne mets pas de caractères accentués dans les noms de variables et que le code que tu nous a montré n'est qu'un dommy pour notre compréhension. Car le compilateur et les accents, ça fé pas vrémang bon ménageu, vé!

---

Si !!! encore un truc que je savais pas

Bonjour Adamm

Pour ton cas il faut alors rajouter une * à la fin de ta variable valeurachercher pour que CountIf compte toutes les cellules qui commencent par les lettres qu'il y a avant *.
Tu peux faire :

Code:

---

valeurachercher = Feuil5.Range("B" & (3 + incrément)).Formula & "*"

---

@+