Calculer cellule si texte coloré

Bonjour,

En colonne D j'ai du texte de couleurs rouge ou noir

En colonne E j'ai des montants

ce que je voudrais en L25 c'est que soient comptabilisés tout ce qui se trouve en colonne E si les caractères en colonne D sont de couleur rouge.

Avec mes sincères remerciements anticipés

Bonjour,

Vous devrez passer par une fonction personnalisée en VBA

Function SommeCouleurTexte(PlageTexte As Range, PlageSum As Range, RefCoul As Range)
  Dim Cel As Range, Tot As Double
  ' Recalculer la fonction à chaque changement dans la feuille
  Application.Volatile
  ' Boucle sur les cellules contenant le Texte
  For Each Cel In PlageTexte
      If Cel.Font.Color = RefCoul.Font.Color Then Tot = Tot + Cells(Cel.Row, PlageSum.Column).Value
  Next Cel
  SommeCouleurTexte = Tot
End Function

Voici le fichier

A+

Bonjour,

Je vous remercie beaucoup pour votre retour rapide.

Mes chiffres ne sont eux pas de couleur rouge en colonne E seul le texte en colonne D l'est ; je pense que c'est pour cela que cela ne fonctionne pas avec mon tableau.

7test.xlsx (12.59 Ko)

Re,

Désolé, c'est qui est déraillé et qui n'est pas fait gaffe

J'ai modifié le code de mon post précédent
https://forum.excel-pratique.com/s/goto/1158605

Ca ira mieux

Un immense merci à vous.

Comment puis-je modifier pour que cela s'applique à toute la colonne D et à toute la E s'il vous plait ?

Merci d'avance

Re,

Ca c'est la base de l'utilisation d'Excel quand même

Mais mettre toute la colonne dans la formule, n'est absolument pas à faire, Excel va figer

Utiliser un TS (Tableau Structuré) comme ça la formule se reportera automatiquement

A+

Un grand merci pour votre aide

Très belle fin de semaine

Bonjour,

LORSQUE LE PROBLÈME EST RÉSOLU

Si vous avez obtenu la réponse espérée, commencez par cliquer sur le bouton v du ou des posts qui ont permis de résoudre votre problème

A+

Rechercher des sujets similaires à "calculer texte colore"