Summenprodukt/ Zählwenn

Forumthread: Summenprodukt/ Zählwenn

07.11.2004 12:04:30

Joerg

Hallo,
Problem mit der Summenprodukt/ Zählwennfunktion (o.ä. Funktionen):
Im Bereich A1 bis E32 soll geprüft werden ob in einer Zeile zwei Bedingungen zutreffen,
z.B.: Schriftfarbe ROT in der Spalte 2 und ein bestimmter Name in Spalte 3 bis 5 der gleichen Zeile.
Anschliessend soll in einem anderen Kästchen z.B J3 jedesmal wenn die Bedingungen zutreffen 1 addiert werden.
Danke Joerg

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Summenprodukt/ Zählwenn

07.11.2004 13:38:12

Hajo_Zi
AW: Summenprodukt/ Zählwenn

07.11.2004 14:53:14

Joerg
AW: Summenprodukt/ Zählwenn

07.11.2004 16:22:40

Joerg
AW: Summenprodukt/ Zählwenn

07.11.2004 18:06:12

Josef
Danke

07.11.2004 19:33:39

Joerg

AW: Summenprodukt/ Zählwenn

07.11.2004 13:38:12

Hajo_Zi

Hallo Joerg,
mit der cschriftfarbe auslesen geht nur mit Hilfsspalte. Ansatz siehe meine HP.
http://home.media-n.de/ziplies/gepackt/ohne_vba/farbe_der_zelle.zip
Der Rest dürfte dann kein Problem mehr sein.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.

AW: Summenprodukt/ Zählwenn

07.11.2004 14:53:14

Joerg

Hallo,
erstmal danke für den Lösungsansatz, aber ich glaube, das ist fast zu kompliziert für meine Zwecke.
In meiner Tabelle soll einfach nur gezählt werden, welche Person wie oft an Feiertagen und Wochenenden arbeiten muss. Dazu habe ich Wochenenden und Feiertage mit einem Makro rot eingefärbt.(siehe unten)
Jetzt soll in einem weiteren Tabelle gezählt werden wer wieoft an Montagen, Dienstagen ... Sonntagen Dienst hat.
Gibt es dafür eine einfache Lösung ?
Gruss Joerg
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.ScreenUpdating = False ' Wochenenden --> Zeilen ROT färben For I = 2 To 32 If Cells(I, 2).Value = "Sa" Or Cells(I, 2).Value = "So" Then ' "Fr" Or Cells(I, 2).Value = Range(Cells(I, 1), Cells(I, 5)).Font.ColorIndex = 3 Range(Cells(I, 1), Cells(I, 5)).Interior.ColorIndex = 15 Else: Range(Cells(I, 1), Cells(I, 5)).Font.ColorIndex = 11 Range(Cells(I, 1), Cells(I, 5)).Interior.ColorIndex = xlNone End If Next ' Bewegliche Feiertage --> Zeilen ROT färben For K = 2 To 32 For l = 2 To 36 ' in Tabelle Feiertage If Cells(K, 1).Value = Worksheets("Feiertage").Cells(l, 1).Value Then Range(Cells(K, 1), Cells(K, 5)).Font.ColorIndex = 3 Range(Cells(K, 1), Cells(K, 5)).Interior.ColorIndex = 15 End If Next Next Application.ScreenUpdating = True End Sub

AW: Summenprodukt/ Zählwenn

07.11.2004 16:22:40

Joerg

Hallo
Habe mittlerweile eine Lösung mit Hilfe von Summenprodukt (=SUMMENPRODUKT((WOCHENTAG(A2:A32)=2)*(C2:E32="Name")) gefunden.
Gibt es eine einfachere Lösung mittels VBA, damit ich nicht unbedingt für jeden Wochentag und jeden Namen ein Summenprodukt erstellen muss und für jeden Namen direkt die Anzahl der Wochentage, Samstage, Sonntage und Feiertage ermitteln kann ?
Danke Joerg

AW: Summenprodukt/ Zählwenn

07.11.2004 18:06:12

Josef

Hallo Joerg!
Vieleicht so!

Tabelle3

	A	B	D	E	F	G	H	I	J	K	L
1	Mi 01.12.04	Karl		Name	Wochentag	Samstag	Sonntag	Feiertag	Gesamt		08.12.2004
2	Do 02.12.04	Werner		Karl	4	1	1	2	7		24.12.2004
3	Fr 03.12.04	Kurt		Werner	5	0	1	0	6		25.12.2004
4	Sa 04.12.04	Hans		Kurt	4	1	0	1	6		26.12.2004
5	So 05.12.04	Robert		Hans	3	1	1	1	6		31.12.2004
6	Mo 06.12.04	Karl		Robert	4	1	1	1	6
7	Di 07.12.04	Werner
8	Mi 08.12.04	Kurt
9	Do 09.12.04	Hans
10	Fr 10.12.04	Robert
11	Sa 11.12.04	Karl
12	So 12.12.04	Werner
13	Mo 13.12.04	Kurt
14	Di 14.12.04	Hans
15	Mi 15.12.04	Robert
16	Do 16.12.04	Karl
17	Fr 17.12.04	Werner
18	Sa 18.12.04	Kurt
19	So 19.12.04	Hans
20	Mo 20.12.04	Robert
21	Di 21.12.04	Karl
22	Mi 22.12.04	Werner
23	Do 23.12.04	Kurt
24	Fr 24.12.04	Hans
25	Sa 25.12.04	Robert
26	So 26.12.04	Karl
27	Mo 27.12.04	Werner
28	Di 28.12.04	Kurt
29	Mi 29.12.04	Hans
30	Do 30.12.04	Robert
31	Fr 31.12.04	Karl

Formeln der Tabelle

F2 : =SUMMENPRODUKT(($B$1:$B$31=$E2)*(WOCHENTAG($A$1:$A$31;2)<6)*(ISTFEHLER($C$1:$C$31)))
G2 : =SUMMENPRODUKT(($B$1:$B$31=$E2)*(WOCHENTAG($A$1:$A$31;2)=6))
H2 : =SUMMENPRODUKT(($B$1:$B$31=$E2)*(WOCHENTAG($A$1:$A$31;2)=7))
I2 : =SUMMENPRODUKT(($B$1:$B$31=$E2)*(NICHT(ISTFEHLER($C$1:$C$31))))
J2 : =ZÄHLENWENN($B$1:$B$31;$E2)
F3 : =SUMMENPRODUKT(($B$1:$B$31=$E3)*(WOCHENTAG($A$1:$A$31;2)<6)*(ISTFEHLER($C$1:$C$31)))
G3 : =SUMMENPRODUKT(($B$1:$B$31=$E3)*(WOCHENTAG($A$1:$A$31;2)=6))
H3 : =SUMMENPRODUKT(($B$1:$B$31=$E3)*(WOCHENTAG($A$1:$A$31;2)=7))
I3 : =SUMMENPRODUKT(($B$1:$B$31=$E3)*(NICHT(ISTFEHLER($C$1:$C$31))))
J3 : =ZÄHLENWENN($B$1:$B$31;$E3)
F4 : =SUMMENPRODUKT(($B$1:$B$31=$E4)*(WOCHENTAG($A$1:$A$31;2)<6)*(ISTFEHLER($C$1:$C$31)))
G4 : =SUMMENPRODUKT(($B$1:$B$31=$E4)*(WOCHENTAG($A$1:$A$31;2)=6))
H4 : =SUMMENPRODUKT(($B$1:$B$31=$E4)*(WOCHENTAG($A$1:$A$31;2)=7))
I4 : =SUMMENPRODUKT(($B$1:$B$31=$E4)*(NICHT(ISTFEHLER($C$1:$C$31))))
J4 : =ZÄHLENWENN($B$1:$B$31;$E4)
F5 : =SUMMENPRODUKT(($B$1:$B$31=$E5)*(WOCHENTAG($A$1:$A$31;2)<6)*(ISTFEHLER($C$1:$C$31)))
G5 : =SUMMENPRODUKT(($B$1:$B$31=$E5)*(WOCHENTAG($A$1:$A$31;2)=6))
H5 : =SUMMENPRODUKT(($B$1:$B$31=$E5)*(WOCHENTAG($A$1:$A$31;2)=7))
I5 : =SUMMENPRODUKT(($B$1:$B$31=$E5)*(NICHT(ISTFEHLER($C$1:$C$31))))
J5 : =ZÄHLENWENN($B$1:$B$31;$E5)
F6 : =SUMMENPRODUKT(($B$1:$B$31=$E6)*(WOCHENTAG($A$1:$A$31;2)<6)*(ISTFEHLER($C$1:$C$31)))
G6 : =SUMMENPRODUKT(($B$1:$B$31=$E6)*(WOCHENTAG($A$1:$A$31;2)=6))
H6 : =SUMMENPRODUKT(($B$1:$B$31=$E6)*(WOCHENTAG($A$1:$A$31;2)=7))
I6 : =SUMMENPRODUKT(($B$1:$B$31=$E6)*(NICHT(ISTFEHLER($C$1:$C$31))))
J6 : =ZÄHLENWENN($B$1:$B$31;$E6)

Bedingte Formatierungen der Tabelle

Zelle	Nr.: / Bedingung	Format
A1	1. / Formel ist =VERGLEICH(A1;festtage;0)	Abc
A1	2. / Formel ist =WOCHENTAG(A1;2)>5	Abc
A2	1. / Formel ist =VERGLEICH(A2;festtage;0)	Abc
A2	2. / Formel ist =WOCHENTAG(A2;2)>5	Abc
A3	1. / Formel ist =VERGLEICH(A3;festtage;0)	Abc
A3	2. / Formel ist =WOCHENTAG(A3;2)>5	Abc
A4	1. / Formel ist =VERGLEICH(A4;festtage;0)	Abc
A4	2. / Formel ist =WOCHENTAG(A4;2)>5	Abc
A5	1. / Formel ist =VERGLEICH(A5;festtage;0)	Abc
A5	2. / Formel ist =WOCHENTAG(A5;2)>5	Abc
A6	1. / Formel ist =VERGLEICH(A6;festtage;0)	Abc
A6	2. / Formel ist =WOCHENTAG(A6;2)>5	Abc
A7	1. / Formel ist =VERGLEICH(A7;festtage;0)	Abc
A7	2. / Formel ist =WOCHENTAG(A7;2)>5	Abc
A8	1. / Formel ist =VERGLEICH(A8;festtage;0)	Abc
A8	2. / Formel ist =WOCHENTAG(A8;2)>5	Abc
A9	1. / Formel ist =VERGLEICH(A9;festtage;0)	Abc
A9	2. / Formel ist =WOCHENTAG(A9;2)>5	Abc
A10	1. / Formel ist =VERGLEICH(A10;festtage;0)	Abc
A10	2. / Formel ist =WOCHENTAG(A10;2)>5	Abc
A11	1. / Formel ist =VERGLEICH(A11;festtage;0)	Abc
A11	2. / Formel ist =WOCHENTAG(A11;2)>5	Abc
A12	1. / Formel ist =VERGLEICH(A12;festtage;0)	Abc
A12	2. / Formel ist =WOCHENTAG(A12;2)>5	Abc
A13	1. / Formel ist =VERGLEICH(A13;festtage;0)	Abc
A13	2. / Formel ist =WOCHENTAG(A13;2)>5	Abc
A14	1. / Formel ist =VERGLEICH(A14;festtage;0)	Abc
A14	2. / Formel ist =WOCHENTAG(A14;2)>5	Abc
A15	1. / Formel ist =VERGLEICH(A15;festtage;0)	Abc
A15	2. / Formel ist =WOCHENTAG(A15;2)>5	Abc
A16	1. / Formel ist =VERGLEICH(A16;festtage;0)	Abc
A16	2. / Formel ist =WOCHENTAG(A16;2)>5	Abc
A17	1. / Formel ist =VERGLEICH(A17;festtage;0)	Abc
A17	2. / Formel ist =WOCHENTAG(A17;2)>5	Abc
A18	1. / Formel ist =VERGLEICH(A18;festtage;0)	Abc
A18	2. / Formel ist =WOCHENTAG(A18;2)>5	Abc
A19	1. / Formel ist =VERGLEICH(A19;festtage;0)	Abc
A19	2. / Formel ist =WOCHENTAG(A19;2)>5	Abc
A20	1. / Formel ist =VERGLEICH(A20;festtage;0)	Abc
A20	2. / Formel ist =WOCHENTAG(A20;2)>5	Abc
A21	1. / Formel ist =VERGLEICH(A21;festtage;0)	Abc
A21	2. / Formel ist =WOCHENTAG(A21;2)>5	Abc
A22	1. / Formel ist =VERGLEICH(A22;festtage;0)	Abc
A22	2. / Formel ist =WOCHENTAG(A22;2)>5	Abc
A23	1. / Formel ist =VERGLEICH(A23;festtage;0)	Abc
A23	2. / Formel ist =WOCHENTAG(A23;2)>5	Abc
A24	1. / Formel ist =VERGLEICH(A24;festtage;0)	Abc
A24	2. / Formel ist =WOCHENTAG(A24;2)>5	Abc
A25	1. / Formel ist =VERGLEICH(A25;festtage;0)	Abc
A25	2. / Formel ist =WOCHENTAG(A25;2)>5	Abc
A26	1. / Formel ist =VERGLEICH(A26;festtage;0)	Abc
A26	2. / Formel ist =WOCHENTAG(A26;2)>5	Abc
A27	1. / Formel ist =VERGLEICH(A27;festtage;0)	Abc
A27	2. / Formel ist =WOCHENTAG(A27;2)>5	Abc
A28	1. / Formel ist =VERGLEICH(A28;festtage;0)	Abc
A28	2. / Formel ist =WOCHENTAG(A28;2)>5	Abc
A29	1. / Formel ist =VERGLEICH(A29;festtage;0)	Abc
A29	2. / Formel ist =WOCHENTAG(A29;2)>5	Abc
A30	1. / Formel ist =VERGLEICH(A30;festtage;0)	Abc
A30	2. / Formel ist =WOCHENTAG(A30;2)>5	Abc
A31	1. / Formel ist =VERGLEICH(A31;festtage;0)	Abc
A31	2. / Formel ist =WOCHENTAG(A31;2)>5	Abc

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
Gruß Sepp

Danke

07.11.2004 19:33:39

Joerg

Hallo,
Dank für Deine Mühe, so ähnlich habe ich es mittlerweile auch gelöst, ist leider nur eine mühselige Arbeit !!
Gruss Joerg

Beliebteste Forumthreads (12 Monate)

Forumthread: Summenprodukt/ Zählwenn

5 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread