du NB SI en vba etendu

salut la room

j'ai ce petit code dans ma feuille1

Code:

---

1 2 3

Feuil1.Range("N155").Value = Application.WorksheetFunction.CountIf(Range("N5:N150"), "G")

---

bon ca marche pour cette colonne ca me compte bien les "G" de la colonne N de 5 a 150 et m'affiche bien le resultat dans la meme colonne en 155

pourriez vous m'aider a etendre ma formule de façon simple de de la colonne N a OF pour avoir un resultat de chaque coloonne dans leur case respectif en 155

merci bisous

Bonjour,

Et si tu passais par Formula ?

Code:

---

Feuil1.Range("N155:OF155").Formula = "=CountIf(N5:N150, ""G"")"

---

Si tu ne veux pas qu'il y ait des formules tu peux toujours copier/coller en valeur cette ligne 155 par la suite.

purée mec pour moi tu es un héro

merci bcp biz