XL 2016 compter les cases de couleurs

[bob64100]

Bonjour à tous,

Depuis hier j'essaie de faire un joli tableau mais je me heurte encore à un problème.
Je voudrais en même temps dans une même colonne savoir le nombre de valeur écrites, avoir une somme en bas et aussi compter le nombre de cases de couleurs ?
Cette couleurs (grise) me permettrait de différencier les cases vides (annulation d'un commande par exemple) qui le seront toujours des autres remplies plus tard par un chiffre

Merci de votre réponse ou me dire si c'est impossible

 

[Wayki]

Bonjour,
C'est possible de 2 façons :
- Par VBA
- Avec le pack de fonction XLP qui intègre une formule qui fait ça.
Je vous laisse vous renseigner et revenir si rien ne vous inspire.
A +

 

[bob64100]

Merci Wayki
Non vu mon niveau rien ne m'inspire
Par contre il me faudrait quelque chose de simple qui ne soit pas bloqué par la sécurité informatique de ma société ... donc je pense peut etre au XLP

 

[bob64100]

bon pas gagné je crois

 

[Wayki]

Bonjour,
Voici un fichier sans compléments.
Il est possible si vous préférez, d'afficher le résultat dans une fenêtre de message.
A +

 

[bob64100]

Bonjour,

Merci de votre aide, mais je ne vois pas ou le décompte des couleurs se fait. Car en changeant une case en gris ou en enlevant une rien de se passe.... C'est un compte manuel

 

[Eric C]

Bonsoir le forum
Bonsoir bob64100, bonsoir Wayki

Il suffit, pour en temps réel, de placer les instructions, dans la feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
couleur = [c8].Interior.Color
C = Range("C" & Rows.Count).End(xlUp).Row
Compteur = 0
For Each cellule In Range("C9", "C" & C)
    If cellule.Interior.Color = couleur Then
    Compteur = Compteur + 1
    End If
Next cellule
'Range("C" & C + 1) = Compteur & " cellules grises"
Range("C30") = Compteur & " " & " cellules grises"
End Sub

Bonne fin de soirée à toutes & à tous
@+ Eric c

 

[Wayki]

Bonjour,

Merci de votre aide, mais je ne vois pas ou le décompte des couleurs se fait. Car en changeant une case en gris ou en enlevant une rien de se passe.... C'est un compte manuel

Juste pour expliquer, j'ai fais une macro qui comme vous l'avez demandé, compte le nombre de cases de la couleur précisé.
Elle prend comme référence la couleur de la cellule qui est noté comme couleur de référence (première couleur de la feuille de calcul)
Il était question d'une couleur (grise, mais la macro marche si on change la couleur de référence par du rouge par exemple.)
Il suffit de lancer la macro pour qu'elle fasse le job.
Si il faut que ce soit automatique, suivre les manips d'Éric.
Je vois pas où est la solution dans votre post Oo

 

[Eric C]

@ Wayki : le code reste ta propriété. Je n'ai fait que "revisiter" celui-ci.

Bon ouikand à toutes & à tous
@+ Eric c

 

[Wayki]

Bonjour Éric c, bob, le forum,
Aucuns soucis je répondais à Bob64100.
A +

 

[bob64100]

Bonsoir à tous,

Désolé pour ma réponse tardive
Merci pour votre aide à tous. Pour moi le problème est résolu de ce fait
A++