Office: (Office 2010) Schriftfarbe abfragen

Hallo, folgendes Problem

in einer Spalte stehen Zahlen, davon wird die Summe gebildet. Wenn aber eine Zahl Rot eingefärbt ist, wird diese von der Summe abgezogen.

Wie könnte man das machen? Wenn möglich ohne VBA.

:)

 

Hallo,

unterscheide, was Du siehst und was in der Zelle steht.

Ist die Zahl "von Hand" eingefärbt, wirst Du kaum an Makros vorbeikommen. Aber: "Rechnen nach Farben" ist bei dieser Art der Färbung mehr als tückisch - davon rate ich dringend ab! Excel rechnet mit Zahlen, nicht mit buntem Zeug *wink.gif*

Idealerweise ist die Farbe über ein Zahlenformat vorgegeben, z. B.
Code:

Dann erscheint das "-" bei den negativen Zahlen nicht, Excel betrachtet diese Werte aber korrekt als negativ und zieht sie (z. B. beim Bilden einer Summe) korrekt ab.

Die Rückfrage also: Was liegt in welcher Form vor? Kannst Du ein Muster zur Verfügung stellen?

Grüße
EarlFred

 

Hi Thorsten,

wodurch werden denn die Zahlen rot? Weil sie negative Zahlen sind? Dann formatiere doch die Spalte entsprechend, dass negative Zahlen nicht nur rot, sondern auch mit einem davor stehenden Minus dargestellt werden. Dann brauchst Du kein VBA und musst garnix an der Summenformel ändern.

 

Also die Schrift wird per Hand eingefärbt. Die roten Zahlen werden dann von der kummulierten Summe abgezogen. Können nicht Minuszahlen sein da vorher noch die Summe gebildet wird. Ist nicht direkt für mich, sondern für jemand anders.
Dann eben mit VBA wenns nicht anders geht. Wie frage ich die Farbe der Schrift ab. Dann brauch ich eine Hilfszelle ; A1 , wo alle roten zahlen adiiert werden.


17.09.2012 18.09.2012 19.09.2012
1000 500
1100 550
1200 600
1300 650
1400 700
1500 750
1600 800

Summe 9100 4550 0
kum. S 9100 13650 4550

 

Hi,
schau dir mal folgendfen Link an....
http://www.at-exceltraining.de/index...ezuordnen.html

Mit dem Typ 24 könntest du die Abfrage generieren und dann an deine Berechnung anbinden...

 

hatte ich ;

=Zelle.Zuordnen macht er nicht !

gibt nur =Zelle("farbe";B5) , aber da kommt immer eine Null
!?!?

 

Hallo,

Bilde die Summe über den Absolutwert:
Code:

Geschweifte Klammern nicht mit eingeben, sondern die Formeleingabe mit Strg+Shift+Enter abschließen (Matrixfunktion).

Alternative: Kennzeichne die "Farbgebung" am besten über ein in eine (Nachbar-)Zelle eingetragenes Kennzeichen, z. B. "x". Wende darauf dann einfach Summewenn() an. Die tatsächliche Färbung könnte dann eine bedingte Formatierung übernehmen.

Grüße
EarlFred

 

also da stehn nur positive Zahlen.

Ich möchte die Farbe der Schrift abfragen , und wenn Rot dann zusammaddieren und von der kummulierten Summe abziehen.

 

Hallo,

OK, dann mach das so. Gegen andere (in meinen Augen bessere) Vorschläge bis Du immun. Such bitte mal nach Farbsumme, da solltest Du fündig werden.

Grüße
EarlFred

 

Scheinbar hast du en Link nicht richtig gelesen...
Du musst einen Namen vergeben und in Bezieht sich auf die Formel =Zelle.Zuordnen... eingeben!!!

 

ganz großen Dank!!! , habs jetzt über den Formelmanager hinbekommen, kannte ich noch nicht, vorallem ZELLE.ZUORDNEN ist mir neu. Aber danke auch für die gutgemeinten Ratschläge, aber ich soll das so machen;

Wenn nämlich Chef reinkommt er will das so haben und ich seine Mappe nicht haben darf , dann soll es eben so sein.

Jetzt ist noch ein anderes Problem:
Ich brauch für die Abfrage der Farbe eine Hilfsspalte, aber er hat sehr viele Spalten und fortlaufend.
Ich muss das irgendwie ohne Hilfsspalte hinbekommen. Ich glaub das geht nicht !

 

Farbe ist in meinem Fall der Name ( Namensmanager )

Code:

 

Hallo , also habe als Formel eingetragen =ZELLE.ZUORDNEN(24;INDIREKT("ZS(-5)"; )) - die Hilfsspalte ist 5 Spalten nach rechts , aber das müssten man für jede Spalte machen ! Das ist Mist.

Ich hab mal die excell mit angehangen, hab auch mit vba versucht ... komm ich erstmal nicht weiter, ist wohl nicht so einfach!

Gruß

 

Habs jetzt per Makro gelöst..

Ich hoffe das ist was du wolltest...
=SummeWennFarbe

 

SUPER! Aber ich bekomme es mit Gruen nicht hin, also die 10 , die Zahl stimmt, also wenn ich =SummeWennFarbe(C4:C11;10) macht die Funktion das nicht ??
Mit anderen Farben wie Gelb gehts, aber mit Gruen ( 10) gehts nicht ???
Gruß