title image


Smiley Naja, nicht direkt, aber per UDF...
Hallo Omen,



Per Excel ist mir keine solche Funktion bekannt, Du kannst Dir aber per VBA eine eigene Funktion (sog. UDF) programmieren :



Function Farbsumme(Bereich As Range, farbe)

    'Summiert alle Zellen im angegebenen Bereich

    'Als Farben gelten folgende Werte :

    '16711680 = Blau

    '0 = Schwarz

    '255 = Rot

    '65280 = Grelles Grün

    '65535 = Gelb

    '16777215 = weiss

    summe = 0

    For Each Zelle In Bereich

        If Zelle.Font.Color = farbe Then

            summe = summe + Zelle.Value

        End If

    Next

    Farbsumme = summe

End Function Code eingefügt mit Syntaxhighlighter 1.16

Dann kannst Du ab sofort in der Tabelle z.B. folgende Funktion verwenden :

=FarbSumme(A1:B20;255)

Die Zahl 255 steht dabei für Rot formatierten Zahlen (andere Farben, siehe Maokro oben).



Ist zwar nicht 100% benutzerfreundlich, aber immerhin klappt es so.

Grüße, NoNet

  1,2,3 - kleine Excelei :   Infos + Anmeldung zum Jährlichen Exceltreffen



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: