Nombre de personnes par rapport à la couleur [Résolu]

mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention - 14 juin 2017 à 19:34 - Dernière réponse : mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention
- 16 juin 2017 à 19:07
Bonjour,
J'ai deux couleurs, gris pour Mapadis et bleu pour Culture.
Ces deux couleurs concernent des personnes.
J'aimerai à côté de chaque couleur, calculer le nombre de personnes correspondantes.
http://www.cjoint.com/c/GForGf410MJ

Merci d'avance.
Cordialement.





Afficher la suite 

7 réponses

Répondre au sujet
ccm81 8204 Messages postés lundi 18 octobre 2010Date d'inscription 12 décembre 2017 Dernière intervention - 14 juin 2017 à 20:29
0
Utile
1
Bonjour

Tes couleurs étant mises "à la main", il faut passer par une macro
http://www.cjoint.com/c/GFosCqvLOM8

Cdlmnt
mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention - 14 juin 2017 à 21:02
Bonjour et merci pour votre aide.
Je n'ai jamais eu de formation donc je galère un peu.
Peux tu me dire ce qu'est une macro et comment faire s'il vous plait ?
Merci d'avance.
Cordialement.
Commenter la réponse de ccm81
ccm81 8204 Messages postés lundi 18 octobre 2010Date d'inscription 12 décembre 2017 Dernière intervention - 14 juin 2017 à 21:12
0
Utile
2
Une macro est un bout de programme qui ajoute une fonctionnalité à Excel.
Excel ne possède pas à l'origine de fonction permettant de dénombrer les cellules d'une plage qui ont un fond d'une couleur donnée, il faut donc la fabriquer ... avec une macro
Dans ton fichier
1. Alt-F11 pour accéder à l'éditeur vba
2. Insertion/Module
3. Coller tout ce code
Option Explicit

Public Function NBCoul(coulref As Range, plage As Range)
Dim cel As Range, coul As Long, nbc As Long
Application.Volatile
coul = coulref.Interior.ColorIndex
nbc = 0
For Each cel In plage
  If cel.Interior.ColorIndex = coul Then nbc = nbc + 1
Next cel
NBCoul = nbc
End Function

4. retour à la feuille
5. Ton fichier dispose maintenant de la fonction NbCoul que tu peux utiliser en lui donnant
- coullref la cellule dont le fond est celui à rechercher
- plage : la plage à traiter
Dans ton exemple la formule dans la cellule I3
=nbcoul(G3;A2:A119)

Cdlmnt
mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention - 14 juin 2017 à 21:19
Merci, je vais essayer.
Bonne soirée.
Cordialement.
mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention > mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention - 14 juin 2017 à 22:31
J'ai réussi, c'est cool.
Encore merci pour ton aide.
Salut.
Commenter la réponse de ccm81
ccm81 8204 Messages postés lundi 18 octobre 2010Date d'inscription 12 décembre 2017 Dernière intervention - Modifié par ccm81 le 15/06/2017 à 11:17
0
Utile
1
De rien

j'ai oublié ... Il te faut enregistrer ton fichier avec le type .xlsm (m comme macro)
Fichier/Enregistrer sous et tu choisi le type

Bonne journée
mj1974 1699 Messages postés samedi 25 février 2012Date d'inscription 25 novembre 2017 Dernière intervention - 16 juin 2017 à 19:07
Salut.
Désolé pour le retard.
Merci pour tout.
Bon week end.
Commenter la réponse de ccm81