Zellen Anzahl nach Farbe unterschieden

Forumthread: Zellen Anzahl nach Farbe unterschieden

18.12.2007 11:01:00

mfischle

Hallo liebe Forumer,
ich habe eine Spalte in der Texte in roter und blauer Farbe hinterlegt sind. Ich brauche jeweils Anzahl der Zellen mit roten und blauen Texten.
Wäre schön, wenn sich jemand meldet. Vielen Dank.
Gruß
Mfischle

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Melde mich freiwillig...(owT)

18.12.2007 11:12:12

Archiv

AW: Zellen Anzahl nach Farbe unterschieden

18.12.2007 11:20:47

HermannZ

Hallo Mfische;
geht mit einer Funktion so;
'der Bereich kann auch Text enthalten
'Funktionsaufruf =Summefarbzahl(Zelle mit der gesuchten Farbe;Bereich)
Function Summefarbzahl(Farbe As Range, Bereich As Range) Dim i As Range Dim intColor As Integer Application.Volatile intColor = Farbe(1).Font.ColorIndex For Each i In Bereich.Cells If i.Font.ColorIndex = intColor And IsNumeric(i.Value) Then Summefarbzahl = Summefarbzahl + i End If Next End Function

Beispiel;

	B
3	Summe der
4	Zellen mit
5	farbiger
6	Schrift
7
8	10
9	20
10	30
11	40
12	50
13	60
14	Wert
15	80
16	90
17	100
18	110
19	120
20	130
21	140
22	150
23
24	250
25

Formeln der Tabelle

Zelle	Formel
B24	=Summefarbzahl(B15;B8:B22)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
und ohne VBA so;
Einen Namen vergeben z.B hier Farbe mit
Einfügen-----Name-----Definieren
Namen vergeben unter
Name in der Arbeitsmappe: Farbe
unter Bezieht sich auf: folgende Formel eingeben
=ZELLE.ZUORDNEN(24;INDIREKT("ZS(-1)";FALSCH))
dann Hinzufügen und OK fertig
mit 24 wird die Schriftfarbe bestimmt
mit 63 kann man auch die Hintergrundfarbe bestimmen
F9 drücken wenn Zeilen verändert wurden
Beispiel;

	B	C
33		3
34		0
35		35
36		0
37		35
38		0
39		35
40		0
41		3
42		0
43		35
44		0
45		3
46		0
47		7
48
49	3
50

Formeln der Tabelle

Zelle	Formel
C33	=Farbe
C34	=Farbe
C35	=Farbe
C36	=Farbe
C37	=Farbe
C38	=Farbe
C39	=Farbe
C40	=Farbe
C41	=Farbe
C42	=Farbe
C43	=Farbe
C44	=Farbe
C45	=Farbe
C46	=Farbe
C47	=Farbe
B49	{=SUMME(--(C33:C47=C33))}

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

AW: Zellen Anzahl nach Farbe unterschieden

18.12.2007 11:24:00

mfischle

Vielen Dank, HermannZ!
ich probiere es aus.
gruß
mfischle

AW: Zellen Anzahl nach Farbe unterschieden

18.12.2007 13:17:00

Daniel

Hi
wobei man sich immer darüber im klaren sein muss, daß eine Änderung der Farbe keine Neuberechnung auslöst.
dazu muss erst in einer berechnungsrelevanten Zelle der Zellinhalt geändert werden.
Gruß, Daniel

Beliebteste Forumthreads (12 Monate)

Zellen Anzahl nach Farbe unterschieden

Forumthread: Zellen Anzahl nach Farbe unterschieden

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Zellen Anzahl nach Farbe unterschieden

Forumthread: Zellen Anzahl nach Farbe unterschieden

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread