Salut,
Pourquoi traiter des fonctions aussi simple en VBA alors qu'Excel sait faire, pour la couleur des polices par exemple, mettre en surbrillance la plage à traiter et Format/Mise en forme conditionnelle, sélectionner La Valeur de la cellule est : puis Egale et saisir "p", Format/police sélectionner Blanc
Ajouter
sélectionner La Valeur de la cellule est : puis Egale et saisir "n", Format/police sélectionner Blanc
Ajouter
sélectionner La Valeur de la cellule est : puis Egale et saisir "e", Format/police sélectionner Noir ou Automatique
et OK
Pour compter les p sur une plage de A1 à A30 par exemple
=NB.SI(A1:B30;"p")
Pour compter les n
=NB.SI(A1:B30;"n")
Pour compter les e
=NB.SI(A1:B30;"e")
Ensuite pour avoir le total des tois valeurs, soit tu additionnes les tois cellules ou cette formule
=NB.SI(A1:B30;"p")+NB.SI(A1:B30;"n")+NB.SI(A1:B30;"e")
A+
Mike-31
Un problème sans solution est un problème mal posé (Einstein)