XL pour MAC Somme sous condition de couleur d'une cellule

fayer007 · 4 Janvier 2021

Bonsoir à tous,

je souhaiterais solliciter vos talents d'exceleur. En effet, je veux faire la somme d'une ligne avec une trentaine de case. Simple de prime abord mais pour me simplifier la tache, des cases seront en rouge et j'aimerai que la somme de ces cases rouges soient additionnées à part.

Avez vous une idée?

Merci de votre retour!

soan · 6 Janvier 2021

@fayer007

à tout hasard, le fichier ci-dessous t'aidera peut-être ?

attention : j'ai modifié ma fonction personnalisée
SumRedCells() ; maintenant, elle est ainsi :

VB:

Function SumRedCells() As Long
  Dim T&, col%, lig&: Application.Volatile
  lig = Application.Caller.Row
  For col = 2 To 32
    With Cells(lig, col)
      If .Interior.ColorIndex = 3 Then T = T + .Value
    End With
  Next col
  SumRedCells = T
End Function

j'ai rien d'autre à proposer ; j'espère qu'un autre intervenant
pourra t'aider davantage ; bonne chance !

soan

XL pour MAC Somme sous condition de couleur d'une cellule

fayer007

XLDnaute Junior

soan

XLDnaute Barbatruc

Pièces jointes

Discussions similaires