Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 21:55:37
Preiserhöhung über mehrere Jahre berechnen
17.04.2024 20:19:32
Endzeitpunkt berechnen aus d:hh:mm errechnen
17.04.2024 18:57:33
Errinnerungsfunktion
17.04.2024 16:56:58
Stunden addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1080to1084
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1080to1084
1080to1084
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aus farbigen Zahlen Summe bilden

Aus farbigen Zahlen Summe bilden
12.06.2009 20:18:25
Eby
Hallo!
Heute habe ich eine Frage, bei der ich nicht weiter gekommen war.
In einer Spalte stehen Zahlen. Unten sollen die Summen gebildet werden.
Das Problem ist nun. Die Zahlen wurden blau, rot, gelb von Hand gefärbt.
D.h. es sollen die Zahlen nach den Farben zusammen gezählt werden.
Wie geht das bloß?
Beste Grüße!
Eby

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus farbigen Zahlen Summe bilden
12.06.2009 20:31:45
CarstenAS
Hallo
mit dieser funktion werden alle zahlen mit roter Farbe addiert

Function CountFont(Bereich As Range, iIndex As Integer) As Long
Application.Volatile
For Each Bereich In Bereich
If Bereich.Font.ColorIndex = 3 Then
CountFont = CountFont + Bereich
End If
Next Bereich
End Function


gruß

AW: Aus farbigen Zahlen Summe bilden
13.06.2009 15:05:46
Eby
Hallo!
CarstenAS hatte die Lösung - DANKE!!!
Ich habe die Musterdatei hoch geladen:
https://www.herber.de/bbs/user/62408.xls
Beste Grüße!
Anzeige
AW: Aus farbigen Zahlen Summe bilden
12.06.2009 21:29:20
Eby
Hallo!
Noch komme ich damit nicht zurecht.
Ich will keine Hintergründe zusammen zählen.
Leider kann ich auch keine Hilfszellen nutzen
Es sind die Standardfarben - blau, rot, gelb und grün
Hat noch jemand eine Idee?
AW: Aus farbigen Zahlen Summe bilden
12.06.2009 21:47:50
Herbert
Hallo Ebi
Habe die Funktion auf der Herber-Cd gefunden:

Function CountColor(rng As Range, iColor As Integer)
Dim rngAct As Range
Dim iCount As Integer
For Each rngAct In rng.Cells
If rngAct.Font.ColorIndex = iColor And _
Not IsEmpty(rngAct) Then
iCount = iCount + 1
End If
Next rngAct
CountColor = iCount
End Function


Farbindex: Rot = 3, Blau = 5, Gelb = 6
Gruß Herbert

Anzeige
AW: Aus farbigen Zahlen Summe bilden
12.06.2009 22:14:16
Eby
Danke an alle!
Leider muss ich weg.. aber morgen schaue ich mir alles näher an.
Und dann berichte ich wieder.
Bis dann!

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige