Makro wenn dann Schriftfarbe ändern

13/10/2016 - 09:26 von bingema01 | Report spam
Hallo Leute,

kann mir jemand helfen ein Makro zu finden, dass die Schriftfarbe in 3 Zellen àndert wenn eine andere Zelle ein Kriterium erfüllt?

Zuerst einmal zu meiner Excel Datei:
Es ist ein Kalkulationsschema, in dem alle Positionen aufgeführt sind. Dieses wird ausgefüllt und über Makros werden dann alle Positionen ausgeblendet, welche nicht in der Kalkulation verwendet wurden (Stückzahlen, Meter, Tonnen = 0). Über ein weiteres Makro kann man dann auch alles mit einem Klick formatieren (Faktoren und àhnliches werden ausgeblendet usw.) wodurch ein Angebot entsteht.
nun zu meinem Problem: seither habe ich alles Preise von Hand weiß gemacht, die man nicht sehen darf, ist jedoch sehr mühsam. Ich hàtte gerne ein Makro, das Spalte X abprüft:

wenn in X = "€" dann müssen die Spalten U, V, W (gleiche Zeile natürlich) Schwarz geschrieben werden:

X10 = " " U10:W10 = Schriftfarbe weiß
X11 = "€" U11:W11 = Schriftfarbe schwarz
X12 = " " U12:W12 = Schriftfarbe weiß

usw.

und das von Zeile 15 bis 700.

kann mir jemand weiterhelfen?

Liebe Grüße
 

Lesen sie die antworten

#1 Claus Busch
13/10/2016 - 09:35 | Warnen spam
Hallo,

Am Thu, 13 Oct 2016 00:26:23 -0700 (PDT) schrieb :

Es ist ein Kalkulationsschema, in dem alle Positionen aufgeführt sind. Dieses wird ausgefüllt und über Makros werden dann alle Positionen ausgeblendet, welche nicht in der Kalkulation verwendet wurden (Stückzahlen, Meter, Tonnen = 0). Über ein weiteres Makro kann man dann auch alles mit einem Klick formatieren (Faktoren und àhnliches werden ausgeblendet usw.) wodurch ein Angebot entsteht.
nun zu meinem Problem: seither habe ich alles Preise von Hand weiß gemacht, die man nicht sehen darf, ist jedoch sehr mühsam. Ich hàtte gerne ein Makro, das Spalte X abprüft:

wenn in X = "?" dann müssen die Spalten U, V, W (gleiche Zeile natürlich) Schwarz geschrieben werden:

X10 = " " U10:W10 = Schriftfarbe weiß
X11 = "?" U11:W11 = Schriftfarbe schwarz
X12 = " " U12:W12 = Schriftfarbe weiß



warum machst du dies nicht über die bedingte Formatierung?
Selektiere U10:W bis Ende und stelle die Schriftfarbe auf weiß. Dann mit
weiterhin bestehender Markierung => Bedingte Formatierung => Neue Regel
=> Formel zur Ermittlung... =>
=$X10="?"
und wàhle als Format Schriftfarbe schwarz.


Mit freundlichen Grüßen
Claus
Windows10
Office 2016

Ähnliche fragen