Utiliser la fonction CountIf() en VBA

Bonjour,
J'ai un problème pour utiliser la fonction CountIf(). En fait j'aimerais pouvoir compter le nombre de personnes appartenant à une entité (service) : par exemple "DG / CA /MED". Comme vous voyez ma chaine de caractère contient des espaces. Mais lorsque j'utilise la fonction CountIf() ca se passe bien jusqu'ici :

Code:

---

1 2 3

For Each z1 In zone1 Application.CountIf(z1.Offset(0, 23), "*DG" & "*") then x1 = x1 + 1 Next z1

---

Mais mon problème est que j'ai aussi des entités comme : "DGA / DT / TP" par exemple et donc ma fonction me compte également ces personnes alors que "DG" est différent de "DGA". S'il vous plait, comment puis je faire la différence entre les deux ? Merci d'avance.

Bonjour,
Peut-être en ajoutant un espace après DG :

Code:

---

"*DG "

---

Si tu veux compter que les "DG " (espace après)
Exemple

Code:

---

1 2	MsgBox Application.CountIf(Range("A1:A20"), "DG *")

---

Merci à vous, je vais tester cela et je vous tiens informés.