Bonjour,
On pourrait faire plus court si tu garantis que les 'P', 'C' et 'Q' sont dans le même ordre dans les deux feuilles (et en utilisant des plages nommées), mais ceci devrait fonctionner:
=NB.SI(DECALER(Calendrier!$B$20;;EQUIV($E25;Calendrier!$B$19:$D$19;0)-1;NBVAL(Calendrier!$A$20:$A$37));"")
... à coller en F25, puis copier en bas
[Edit:] dans ta formule, je ne sais pas à quoi servirait "DROITE($E$25;1)*1" ... mais ça ne saurait fonctionner extraire un caractère à droite du texte en E25 (qui ne contient d'ailleurs qu'un unique caractère!) donnera 'P' ... et multiplier un 'P' par 1 ne va provoquer que l'affichage d'une erreur