Addition avec Couleur
Résolu
Karine
-
Mike-31 Messages postés 18407 Date d'inscription Statut Contributeur Dernière intervention -
Mike-31 Messages postés 18407 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Comment peut-on additionner le nombre de cellules d'une colonne contenant un texte en supprimant les cellules colorées ?
Ex :
=NB.SI(C4:C72;"AM") => calcul le nmbre de cellules contenant "AM"
=NB.SI(C4:C72;"AM")-NB.SI(C4:C72;"critère pour couleur???)
Merci de me donner vos propositions
Comment peut-on additionner le nombre de cellules d'une colonne contenant un texte en supprimant les cellules colorées ?
Ex :
=NB.SI(C4:C72;"AM") => calcul le nmbre de cellules contenant "AM"
=NB.SI(C4:C72;"AM")-NB.SI(C4:C72;"critère pour couleur???)
Merci de me donner vos propositions
A voir également:
- Addition avec Couleur
- Addition excel - Guide
- Excel cellule couleur si condition texte - Guide
- Boite a couleur - Télécharger - Divers Photo & Graphisme
- Somme si couleur - Guide
- Bash addition ✓ - Forum Shell
7 réponses
Bonjour,
Je ne connaîs pas VBA
Sur une colonne, je voudrais savoir combien de cases sont notées "AM" (par exemple) sans compter celles qui sont colorées ou mouchetées. (Sans compter certaines cases précises que je peux distignuer en les colorants)
Sinon, pour faire autrement,
Peux-t-on demander l'addition du nombre de cases notée "AM" pour les cases L4:L9, L10:L17 ET L 20:L47 ?
Vous remerciant par avance pour votre aide précieuse
Je ne connaîs pas VBA
Sur une colonne, je voudrais savoir combien de cases sont notées "AM" (par exemple) sans compter celles qui sont colorées ou mouchetées. (Sans compter certaines cases précises que je peux distignuer en les colorants)
Sinon, pour faire autrement,
Peux-t-on demander l'addition du nombre de cases notée "AM" pour les cases L4:L9, L10:L17 ET L 20:L47 ?
Vous remerciant par avance pour votre aide précieuse
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour
pour la couleur, je pense que vous aurez des propositions de macro sous peu;
quant à votre question sur les trois champs, la réponse est simple:
NB.SI(Champ1,code)+NB.SI(Champ2;CODE)ETC....autant que vous voulez
crdlmnt
pour la couleur, je pense que vous aurez des propositions de macro sous peu;
quant à votre question sur les trois champs, la réponse est simple:
NB.SI(Champ1,code)+NB.SI(Champ2;CODE)ETC....autant que vous voulez
crdlmnt
Salut,
Pour compter les cellules de la plage L4:L17 ET L 20:L47 contenant AM, plusieurs possibilités
Un petit code tout simple à coller dans les propriétés de la feuille
(clic droit sur l'onglet de feuille/Visualiser le code) dans la partie blanche coller ce code
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Variant
Dim i As Long
i = 0
If Intersect(Target, [L4:L17,L20:L47]) Is Nothing Then Exit Sub
For Each Cel In [L4:L9,L10:L17,L20:L47]
If Cel.Interior.ColorIndex = xlNone And Cel.Value = "AM" Then i = i + 1
Next
MsgBox "Nombre de cellules sans motif contenant AM : " & i
End Sub
il est possible d'avoir le compte dans une cellule à la place d'avoir une boite de dialogue (msgbox) il suffit de savoir laquelle !
Il est également possible de déclencher le comptage à partir d'un bouton ou de tout autre action sur la feuille reste à la définir. Ce code est déclenché dès qu'une saisie est opérée dans la plage L4:L9, L10:L17 ET L 20:L47
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
Pour compter les cellules de la plage L4:L17 ET L 20:L47 contenant AM, plusieurs possibilités
Un petit code tout simple à coller dans les propriétés de la feuille
(clic droit sur l'onglet de feuille/Visualiser le code) dans la partie blanche coller ce code
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cel As Variant
Dim i As Long
i = 0
If Intersect(Target, [L4:L17,L20:L47]) Is Nothing Then Exit Sub
For Each Cel In [L4:L9,L10:L17,L20:L47]
If Cel.Interior.ColorIndex = xlNone And Cel.Value = "AM" Then i = i + 1
Next
MsgBox "Nombre de cellules sans motif contenant AM : " & i
End Sub
il est possible d'avoir le compte dans une cellule à la place d'avoir une boite de dialogue (msgbox) il suffit de savoir laquelle !
Il est également possible de déclencher le comptage à partir d'un bouton ou de tout autre action sur la feuille reste à la définir. Ce code est déclenché dès qu'une saisie est opérée dans la plage L4:L9, L10:L17 ET L 20:L47
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
