Farbige Zellen auszählen
Immo Brauch
ich möchte in einer Spalte, in der sich neben grünen Zellen einige rot
formatierte Zellen befinden, die roten auszählen. Kann mir jemand helfen?
Wenn es eine Möglichkeit gibt: wie sieht es mit blau, grün und gelb aus?
--
Immo Brauch
Claus Busch
Am Fri, 28 Apr 2006 13:54:02 -0700 schrieb Immo Brauch:
> ich möchte in einer Spalte, in der sich neben grünen Zellen einige rot
> formatierte Zellen befinden, die roten auszählen. Kann mir jemand helfen?
>
> Wenn es eine Möglichkeit gibt: wie sieht es mit blau, grün und gelb aus?
such mal hier nach dem Beitrag "Zählen bei Farbhintergrund" vom 27.04.2006
--
Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2; Office 2000 SP3
claus_busch(at)t-online.de
Herbert Taferner
> ich möchte in einer Spalte, in der sich neben grünen Zellen einige rot
> formatierte Zellen befinden, die roten auszählen. Kann mir jemand helfen?
>
> Wenn es eine Möglichkeit gibt: wie sieht es mit blau, grün und gelb aus?
z. B. so,
Code in ein Modul
'---------------------
Function Farbe(rngBereich As Object, intColor As Integer)
Dim intCounter As Integer
Dim rngAct As Range
Application.Volatile
For Each rngAct In rngBereich
If rngAct.Interior.ColorIndex = intColor Then
intCounter = intCounter + 1
End If
Next rngAct
Farbe = intCounter
End Function
'---------------
in der Zelle dann z. B. für ROT = 3,BLAU = 5,GELB = 6
=Farbe(A1:A10;3) ROT
=Farbe(A1:A10;5) BLAU
usw.
für Farbzahl siehe z. B. hier
http://www.wuestefeld-online.de/excel/tixl0019.htm
mfg Herbert
Thomas Ramel
"Herbert Taferner" wrote:
> > ich möchte in einer Spalte, in der sich neben grünen Zellen einige rot
> > formatierte Zellen befinden, die roten auszählen. Kann mir jemand helfen?
> >
> > Wenn es eine Möglichkeit gibt: wie sieht es mit blau, grün und gelb aus?
> in der Zelle dann z. B. für ROT = 3,BLAU = 5,GELB = 6
> =Farbe(A1:A10;3) ROT
> =Farbe(A1:A10;5) BLAU
> usw.
> für Farbzahl siehe z. B. hier
> http://www.wuestefeld-online.de/excel/tixl0019.htm
Das hat aber nur dann Gültigkeit, wenn die Standard-Farbpalette nicht
verändert worden ist.
Ansonsten schlage ich vor, den Hintergrund einer Zelle gleich mit in die
Berechnung einzubeziehen:
Public Function SummeWennFarbe(Bereich As Range, SuchFarbe As Variant, _
Optional Summe_Bereich As Range, _
Optional bolFont As Boolean = False) As Double
'© Thomas Ramel, 30.05.2003 / erweitert 01.07.2004
'Funktion zur Anwendung von SUMMEWENN() mit Hintergrund- oder Schriftfarbe
'als Kriterium
'
' - Der erste Parameter erwartet den Suchbereich
' - Der zweite Parameter erwartet einen Zellbezug (Hintergrund/Schriftfarbe)
' oder einen Farbindex (Zahl)
' Farbindex '0' zählt Zellen ohne farbigen Hintergrund/Standard-Schriftfarbe
' - Der dritte Parameter erwartet optional den zu summierenden Bereich
' - Der viertte Parameter erwartet Wahr/Falsch für die Festlegung
' ob nach Hintergrund- oder Schriftfarbe gezählt werden soll
'Zur automatischen Aktualisierung im Tabellenblatt den folgenden Term
'anhängen: +(0*JETZT()) und F9 drücken
'Also z.B. wie folgt: =SummeWennFarbe(A1;A1:A10)+(0*JETZT())
Dim intI As Integer
Dim intColor As Integer
Dim Summe As Double
If bolFont Then
If IsObject(varColor) Then
intColor = varColor(1).Font.ColorIndex
Else
intColor = varColor
End If
For Each varArea In rngBereich
For Each rngCell In varArea
If rngCell <> "" And rngCell.Font.ColorIndex = intColor Then
Summe = Summe + Summe_Bereich(intI)
End If
Next
Next
Else
If IsObject(SuchFarbe) Then
intColor = SuchFarbe(1).Interior.ColorIndex
Else
intColor = SuchFarbe
End If
If Summe_Bereich Is Nothing Then Set Summe_Bereich = Bereich
For intI = 1 To Bereich.Count
If Bereich(intI).Interior.ColorIndex = intColor Then
Summe = Summe + Summe_Bereich(intI)
End If
Next intI
End If
SummeWennFarbe = Summe
End Function
--
Mit freundlichen Grüssen
Thomas Ramel (@Web-Interface)
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2003]
Herbert Taferner
> Das hat aber nur dann Gültigkeit, wenn die Standard-Farbpalette nicht
> verändert worden ist.
davon könnte man auch normalerweise ausgehen
> Ansonsten schlage ich vor, den Hintergrund einer Zelle gleich mit in die
> Berechnung einzubeziehen:
das ist natürlich, die die Variante mit Exclusivausstattung,
Klimatronic und beheizten Ledersitzen
mfg Herbert
Thomas Ramel
"Herbert Taferner" wrote:
> > Das hat aber nur dann Gültigkeit, wenn die Standard-Farbpalette nicht
> > verändert worden ist.
>
> davon könnte man auch normalerweise ausgehen
*Das* ist IMO eine 'gefährliche' Annahme ;-)
...oder Du schreibst es dann gleich hin...
> > Ansonsten schlage ich vor, den Hintergrund einer Zelle gleich mit in die
> > Berechnung einzubeziehen:
>
> das ist natürlich, die die Variante mit Exclusivausstattung,
> Klimatronic und beheizten Ledersitzen
In diesem Falle 'kostet' der Luxus nicht mehr als der 'Standard' - daher:
Warum nicht.
Herbert Taferner
> In diesem Falle 'kostet' der Luxus nicht mehr als der 'Standard' - daher:
> Warum nicht.
ja,
die Dinge die nichts (oder nicht mehr) kosten, werden immer weniger
mfg Herbert
Immo Brauch
hallo zusammen,
ups, oje! - das ist ja nun überhaupt nicht mein Gebiet! Was mache ich denn
nun damit?
"Code in ein Modul" schreibt Herbert: wo kommt das Modul hin? Ist das ein
Makro?
Wo beginnt die "Variante mit Exclusivausstattung"?
Bei:
Public Function SummeWennFarbe?
und endet bei
End Function?
Also:
Ich habe das Ganze nun einmal in Excel unter Extras-Makro-VB-Editor in
(Allgemein) als SummeWennFarbe eingegeben und die Makrosicherheit auf Mittel
gestellt, da Excel das Makro nicht mochte.
Dann habe ich das Ganze gespeichert und geschlossen, Excel geschlossen, die
Datei wieder neu geöffnet, aufgrund einer Makrowarnung die Sicherheit auf
mittel gestellt, wieder geschlossen und geöffnet.
Ich erhalte nun in der Zelle, in der die Funktion
"=SummeWennFarbe(W175;X160:X165)+(0*JETZT())" steht, den Alert $Name?. Excel
scheint also die Funktion "SummeWennFarbe nicht zu kennen, oder?
W175 ist meine Musterzelle, X160:X165 mein Bereich, +(0*JETZT()) verstehe
ich in diesem Zusammenhang nicht.
Ich habe dazu noch eine Frage:
Du schreibst in der Dokumentation:
' - Der erste Parameter erwartet den Suchbereich
' - Der zweite Parameter erwartet einen Zellbezug (Hintergrund/Schriftfarbe)
' oder einen Farbindex (Zahl)
und weiter unten:
'Also z.B. wie folgt: =SummeWennFarbe(A1;A1:A10)+(0*JETZT())
Muß es dann nicht heißen:
=SummeWennFarbe(A1:A10;A1)+(0*JETZT())
Suchbereich; Zellbezug
und fehlt dann nicht noch mindestens ein Parameter?:
' - Der dritte Parameter erwartet optional den zu summierenden Bereich
' - Der viertte Parameter erwartet Wahr/Falsch für die Festlegung
--
Immo Brauch
"Thomas Ramel" schrieb:
Herbert Taferner
> ups, oje! - das ist ja nun überhaupt nicht mein Gebiet! Was mache ich denn
> nun damit?
>
> "Code in ein Modul" schreibt Herbert: wo kommt das Modul hin? Ist das ein
> Makro?
schau mal da rein,
http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
da ist alles beschrieben
den Code von Thomas (hier zwischen den Linien) dort reinkopieren
'-----------------------------
'---------------------------
und dann in der Zelle z. B.
=SummeWennFarbe(A1:A10;B1)+(0*JETZT())
Zählbereich A1:A10 und Referenzählfarbe in B1
mfg Herbert
Thomas Ramel
Immo Brauch schrieb am 29.04.2006
> ups, oje! - das ist ja nun überhaupt nicht mein Gebiet! Was mache ich denn
> nun damit?
>
> "Code in ein Modul" schreibt Herbert: wo kommt das Modul hin? Ist das ein
> Makro?
Für das Einbindender Funktion hast Du ja von Herbert bereits einen Link
erhalten; wenns denn noch nicht klappen sollte melde dich bitte wieder.
> Wo beginnt die "Variante mit Exclusivausstattung"?
> Bei:
> Public Function SummeWennFarbe?
> und endet bei
> End Function?
Jep, genau so - ist gar nicht soooo kompliziert, gell ;-)
> Also:
> Ich habe das Ganze nun einmal in Excel unter Extras-Makro-VB-Editor in
> (Allgemein) als SummeWennFarbe eingegeben und die Makrosicherheit auf Mittel
> gestellt, da Excel das Makro nicht mochte.
>
> Dann habe ich das Ganze gespeichert und geschlossen, Excel geschlossen, die
> Datei wieder neu geöffnet, aufgrund einer Makrowarnung die Sicherheit auf
> mittel gestellt, wieder geschlossen und geöffnet.
Ja, da ist IMO die optimalste Einstellung.
Du kannst sehr einfach prüfen ob die Funktion korrket in der Mappe erfasst
wurde.
Im Funktions-Assistenten wird sie dann in der Rubrik 'Benutzerdefiniert'
aufgeführt.
> Ich erhalte nun in der Zelle, in der die Funktion
> "=SummeWennFarbe(W175;X160:X165)+(0*JETZT())" steht, den Alert $Name?. Excel
> scheint also die Funktion "SummeWennFarbe nicht zu kennen, oder?
Ja, das deutet darauf hin, dass der Code (noch) nicht ganz am richtigen ort
steht.
> W175 ist meine Musterzelle, X160:X165 mein Bereich, +(0*JETZT()) verstehe
> ich in diesem Zusammenhang nicht.
Die Erklärung des Terms '+(0*JETZT())' ist im Kommentar des Codes
enthalten.
Excel reagiert nicht mit einer Neuberechnung wenn das Format einer Zelle
sich ändert. Werden also in deinen Daten die Farben neu 'gemischt', dann
aktualisiert sich die Funktion nicht von selbst. Da sich die Funktion
JETZT() aber jede Sekunde anpasst ist dies dann auch für die Farbsumme
gegeben. Also einfach anhängen und gegebenenfalls noch F9 drücken um neu zu
berechnen.
> Ich habe dazu noch eine Frage:
> Du schreibst in der Dokumentation:
> ' - Der erste Parameter erwartet den Suchbereich
> ' - Der zweite Parameter erwartet einen Zellbezug (Hintergrund/Schriftfarbe)
> ' oder einen Farbindex (Zahl)
>
> und weiter unten:
>
> 'Also z.B. wie folgt: =SummeWennFarbe(A1;A1:A10)+(0*JETZT())
Das ist nur ein Beispiel - es deckt nicht alle Möglichkeiten ab, die in der
Funktion geboten werden....
> Muß es dann nicht heißen:
>
> =SummeWennFarbe(A1:A10;A1)+(0*JETZT())
> Suchbereich; Zellbezug
>
> und fehlt dann nicht noch mindestens ein Parameter?:
> ' - Der dritte Parameter erwartet optional den zu summierenden Bereich
> ' - Der viertte Parameter erwartet Wahr/Falsch für die Festlegung
Der dritte und vierte Paramter sind optional - Nummer drei lege einen
anderen Summierungs-Bereich fest als den Prüfbereich.
Und wenn Du den vierten auf 'True' setzt, dann vergleicht die Funkton die
Schriftfarbe und nicht den Zellenhintergrund. Per Default, oder eben wenn
nicht explizit gesetzt wird die Hintergrundfarbe verglichen.
Ich hoffe, dass mit diesen Erklärungen die Funktionsweise etwas klarer
geworden ist - ansonsten frage ohne Hemmungen wieder nach.
Mit freundlichen Grüssen
Thomas Ramel
--
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2000 SP-3]
Microsoft Excel - Die ExpertenTipps:
(http://tinyurl.com/9ov3l und http://tinyurl.com/cmned)
Immo Brauch
hallo Herbert,
danke für den Link, Herbert. Der hat mir sehr geholfen.
> Du kannst sehr einfach prüfen ob die Funktion korrket in der Mappe erfasst
> wurde.
> Im Funktions-Assistenten wird sie dann in der Rubrik 'Benutzerdefiniert'
> aufgeführt.
Der Codebereich ist nun klar, ich habe alles eingefügt, gespeichert und mit
Alt F4 geschlossen. Soweit ist alles klar. Allerdings steht die Funktion im
Funktionsassistenten nicht zur Verfügung. Ich habe die Datei noch einmal
geschlossen und wieder geöffnet - nichts.
Wenn ich mit Alt + F11 die Entwicklungsumgebung für VBA öffne, steht der
Code für SummeWennFarbe noch im rechten Fenster. Ist das richtig?
Ich glaube, mit den Parametern hat Excel (noch) keine Schwierigkeiten, da es
die Funktion wahrscheinlich nicht kennt.
--
Immo Brauch
"Thomas Ramel" schrieb:
> Grüezi Immo
Thomas Ramel
Immo Brauch schrieb am 30.04.2006
> danke für den Link, Herbert. Der hat mir sehr geholfen.
>> Du kannst sehr einfach prüfen ob die Funktion korrket in der Mappe erfasst
>> wurde.
>> Im Funktions-Assistenten wird sie dann in der Rubrik 'Benutzerdefiniert'
>> aufgeführt.
> Der Codebereich ist nun klar, ich habe alles eingefügt, gespeichert und mit
> Alt F4 geschlossen. Soweit ist alles klar. Allerdings steht die Funktion im
> Funktionsassistenten nicht zur Verfügung. Ich habe die Datei noch einmal
> geschlossen und wieder geöffnet - nichts.
>
> Wenn ich mit Alt + F11 die Entwicklungsumgebung für VBA öffne, steht der
> Code für SummeWennFarbe noch im rechten Fenster. Ist das richtig?
Hmmm; vermutlich steht sie nicht in einem modul sondern unter 'Tabelle1'
oder 'Diese Arbeitsmappe'.
Geh nochmal nach folgendem Link vor, dann klappts bestimmt:
http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
Herbert Taferner
> Hmmm; vermutlich steht sie nicht in einem modul sondern unter 'Tabelle1'
> oder 'Diese Arbeitsmappe'.
> Geh nochmal nach folgendem Link vor, dann klappts bestimmt:
>
> http://www.online-excel.de/excel/singsel_vba.php?f=44#s2
Ich habe mal versucht das Problem von Immo nachzustellen,
dabei bin ich draufgekommen das deine Function garnicht das
macht was Immo will, bei der Function werden ja nur die
Zellwerte summiert und nicht die Zellen mit Hintergrundfarbe
gezählt, oder verstehe ich da was falsch.
Ich hätte jetzt mal gedacht er will die Zellen zählen, die eine
bestimmte Farbe haben und nicht dessen Inhalt addieren
mfg Herbert
Thomas Ramel
Herbert Taferner schrieb am 01.05.2006
Hmmm, da könntest Du durchaus recht haben, Herbert!
@Immo
Was wolltest Du denn nun genau?
Die Anzahl der eingefärbten Zellen ermitteln oder die Werte dieser Zellen
summieren?
Wenn um die Anzahl geht ist die Funktion in der Tat nicht die richtige -
nimm dann in diesem Falle die folgende, wobei alle anderen Kriterien fürs
Einfügen dieselben bleiben:
Function ZählenWennFarbe(Bereich As Range, _
SuchFarbe As Variant, _
Optional bolFont As Boolean = False) As Double
'Idee von Melanie Breden, © t.r...@mvps.org / 13.10.2004 / 11.12.2004
'Funktion zur Anwendung von ZÄHLENWENN mit Hintergrundfarbe
'oder Schriftfarbe als Kriterium
'
'Die Parametereingabe erfolgt in derselben Reihenfolge wie in der Funktion
'ZÄHLENWENN():
' - Der erste Parameter erwartet den Suchbereich
' - Der zwiete Parameter erwartet einen Zellbezug
(Hintergrund/Schriftfarbe)
' oder Farbindex (Zahl)
' Farbindex '0' zählt Zellen ohne farbigen
' Hintergrund/Standard-Schriftfarbe
' - Der dritte Parameter erwartet Wahr/Falsch für die Festlegung
' ob nach Hintergrund- oder Schriftfarbe gezählt werden soll
'
' Bsp =ZählenWennFarbe(A1:A10;A1;0) =ZählenWennFarbe(A1;A1:A10;1)
' =ZählenWennFarbe(A1:A10;3;0) =ZählenWennFarbe(3;A1:A10;1)
'Zur automatischen Aktualisierung im Tabellenblatt den folgenden Term
'anhängen: +(0*JETZT()) und F9 drücken
'Also z.B. wie folgt: =ZählenWennFarbe(A1:A10;A1)+(0*JETZT())
Dim intColor As Integer
Dim rngCell As Range
If bolFont Then
If IsObject(SuchFarbe) Then
intColor = SuchFarbe(1).Font.ColorIndex
Else
intColor = SuchFarbe
End If
For Each rngCell In Bereich
If rngCell.Font.ColorIndex = intColor Then
ZählenWennFarbe = ZählenWennFarbe + 1
End If
Next
Else
If IsObject(SuchFarbe) Then
intColor = SuchFarbe(1).Interior.ColorIndex
Else
intColor = SuchFarbe
End If
For Each rngCell In Bereich
If rngCell.Interior.ColorIndex = intColor Then
ZählenWennFarbe = ZählenWennFarbe + 1
End If
Next
End If
End Function
Mit freundlichen Grüssen
Thomas Ramel (@work)
--
- MVP für Microsoft-Excel -
[Win XP Pro SP-2 / xl2003 SP-1]
Immo Brauch
ihr habt aber echt Geduld mit mir. Danke.
Also:
Ich möchte in der Tat die _Anzahl_ der Zellen zählen. SummeWenn ist daher
nicht richtig.
Diese Funktion hatte ich zuerst in der Arbeitsmappe eingefügt, damit sie in
allen Blättern vorhanden ist, später dann auch nur in der Arbeitsmappe. Das
war mein Fehler.
Was will ich machen?
Ich habe in Spalte A monatszahlende Kunden und in Zeile 1 Monate. Die Zellen
erscheinen per bedingter Formatierung bei (noch) nicht erfolgter Zahlung rot,
bei erfolgter Zahlung gelb.
Ich möchte nun per Abfrage nach roten Zellen durch Multiplikation mit den
Monatsbeträgen feststellen, wie hoch meine aktuellen Außenstände sind.
Beispiel:
20 leere Zellen (rot) [Ergebnis der Abfrage]
30 € Monatsbetrag
=> 20 Nichtzahler * 30 € = 600 € Außenstände.
=======================
Jetzt habe ich aber das Modul gefunden und den Code dort eingefügt:
=ZählenWennFarbe(Y150:Y165;X175)+(0*JETZT())
X175 ist meine rote Bezugszelle. Als Ergebnis (*freu*) bekomme ich 16, also
die Anzahl der Zellen des Bereiches Y150:Y175, obwohl 2 Zellen gelb
formatiert sind. Eigentlich müßte das Ergebnis 14 lauten.
Liegt das daran, daß die bedingte 1. Formatierung der Zellen "rot" ist, die
bedingte Formatierung aber sagt, bei Zellwert > 0 formatiere gelb? Hier
möchte ich die roten auszählen. Die Bezugszelle X175 hat durch
FormatÜbertragen dieselbe Formatierung wie die Quellzellen.
Geht das?
--
Immo Brauch
"Thomas Ramel" schrieb:
> Grüezi Herbert
Thomas Ramel
Immo Brauch schrieb am 01.05.2006
> ihr habt aber echt Geduld mit mir. Danke.
Ich denke, das gehört sich einfach so .-9
> Ich möchte in der Tat die _Anzahl_ der Zellen zählen. SummeWenn ist daher
> nicht richtig.
Ja, das hatte ich falsch interpretiert....
> Was will ich machen?
> Ich habe in Spalte A monatszahlende Kunden und in Zeile 1 Monate. Die Zellen
> erscheinen per bedingter Formatierung bei (noch) nicht erfolgter Zahlung rot,
> bei erfolgter Zahlung gelb.
...doch das hier torpediert dein gesamtes Unterfangen :-(
> Jetzt habe ich aber das Modul gefunden und den Code dort eingefügt:
> =ZählenWennFarbe(Y150:Y165;X175)+(0*JETZT())
> X175 ist meine rote Bezugszelle. Als Ergebnis (*freu*) bekomme ich 16, also
> die Anzahl der Zellen des Bereiches Y150:Y175, obwohl 2 Zellen gelb
> formatiert sind. Eigentlich müßte das Ergebnis 14 lauten.
Die Farbe der Bedingten Formatierung liegt auch einer anderen 'Ebene' als
die Formatierung des Hintergrundes, der durch die Funktion ausgewertet
wird.
> Geht das?
Leider nicht - auf die Farben der Bedingten Formatierung ist kein zugriff
möglich.
Du könntest mit ANZAHL() prüfen wieviele Einträge Du insgesamt hast und
dann mit ZÄHLENWENN() ermitteln wieviele bereits bezahlt haben und diese
beiden Werte voneinander subtrahieren.
Immo Brauch
schade :-((
Es wäre so schön gewesen.
Ich habe jetzt folgendes gemacht:
In Spalte A numeriere ich die Kunden durch (z. B. von A3=1 bis A203=200) und
erhalte so den Wert für die Anzahl der nichtleeren Zellen.
Von dem Ergebnis könnte ich doch dann die leeren Zellen aus Spalte X
abziehen. Wie bekomme ich das hin, daß in Spalte Y die leeren Zellen gezählt
werden, wenn die Zelle in derselben Zeile in Spalte A>0?
Beispiel:
Zähle Y=0 wenn A>0.
Mit
=ZÄHLENWENN(A:A;">0")-(ZÄHLENWENN(Y:Y;"0"))
funktioniert es irgendwie nicht.
Kannst Du mir helfen?
--
Immo Brauch
"Thomas Ramel" schrieb:
> Grüezi Immo
>
> Immo Brauch schrieb am 01.05.2006
>
> > ihr habt aber echt Geduld mit mir. Danke.
>
> Ich denke, das gehört sich einfach so .-9
>
> > Ich möchte in der Tat die _Anzahl_ der Zellen zählen. SummeWenn ist daher
> > nicht richtig.
>
> Ja, das hatte ich falsch interpretiert....
>
> > Was will ich machen?
> > Ich habe in Spalte A monatszahlende Kunden und in Zeile 1 Monate. Die Zellen
> > erscheinen per bedingter Formatierung bei (noch) nicht erfolgter Zahlung rot,
> > bei erfolgter Zahlung gelb.
>
> ....doch das hier torpediert dein gesamtes Unterfangen :-(
Claus Busch
Am Tue, 2 May 2006 09:57:01 -0700 schrieb Immo Brauch:
> schade :-((
> Es wäre so schön gewesen.
>
> Ich habe jetzt folgendes gemacht:
> In Spalte A numeriere ich die Kunden durch (z. B. von A3=1 bis A203=200) und
> erhalte so den Wert für die Anzahl der nichtleeren Zellen.
>
> Von dem Ergebnis könnte ich doch dann die leeren Zellen aus Spalte X
> abziehen. Wie bekomme ich das hin, daß in Spalte Y die leeren Zellen gezählt
> werden, wenn die Zelle in derselben Zeile in Spalte A>0?
>
> Beispiel:
> Zähle Y=0 wenn A>0.
>
> Mit
> =ZÄHLENWENN(A:A;">0")-(ZÄHLENWENN(Y:Y;"0"))
> funktioniert es irgendwie nicht.
probiere es mal mit
=ANZAHLLEEREZELLEN(Y3:Y203)
Immo Brauch
> probiere es mal mit
> =ANZAHLLEEREZELLEN(Y3:Y203)
das hatte ich schon und es löst nicht mein Problem. Jedesmal, wenn eine neue
Zeile hinzugefügt wird, muß die Formel angepaßt werden (Y204, Y205, Y206
usw.).
Trotzdem vielen Dank für die Rückmeldung.
--
Immo Brauch
"Claus Busch" schrieb:
Claus Busch
>> probiere es mal mit
>> =ANZAHLLEEREZELLEN(Y3:Y203)
>
> das hatte ich schon und es löst nicht mein Problem. Jedesmal, wenn eine neue
> Zeile hinzugefügt wird, muß die Formel angepaßt werden (Y204, Y205, Y206
> usw.).
dann probiere es doch so:
=SUMMENPRODUKT((A3:A65535>0)*(Y3:Y65535=""))
Thomas Ramel
Immo Brauch schrieb am 02.05.2006
> schade :-((
> Es wäre so schön gewesen.
Ja, das mag sein; die Bedingte Formatierung ist halt eben schon was anderes
als die zellenformate.
> In Spalte A numeriere ich die Kunden durch (z. B. von A3=1 bis A203=200) und
> erhalte so den Wert für die Anzahl der nichtleeren Zellen.
Hmmm, das ist IMO nicht unbedingt notwendig.
> Von dem Ergebnis könnte ich doch dann die leeren Zellen aus Spalte X
> abziehen. Wie bekomme ich das hin, daß in Spalte Y die leeren Zellen gezählt
> werden, wenn die Zelle in derselben Zeile in Spalte A>0?
> Kannst Du mir helfen?
Ich versuchs mal:
=ANAZHL(A:A)-ZÄHLENWENN(Y:Y;">0")
Das zählt alle Eintrge in Spalte A und zieht dann die Einträge die in
Spalte Y bereits gemacht sind ab.