Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1480to1484
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1480to1484
1480to1484
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

vba

vba
21.03.2016 21:20:03
Jürgen
Guten Abend,
ich bin fast fertig mit meinen Vba code,
brauche aber noch einen Code.
In Spalte E ab Zeile 3 habe ich Prozent Angaben.
Ich möchte jetzt alles was unter 50% soll die zelle weiß bleiben.
-100 bis 0 = blau
1 bis 60 = grün
61 bis 75 = gelb
76 bis 100 = rot.
Sollen Füllfarben sein.
Kann mir jemand dabei helfen?
Ich brauche es in Vba und nicht in bedingte Formatierung.
Danke an alle
Gruß Jürgen

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
unklare Frage
21.03.2016 21:55:27
Uduuh
Hallo,
-100-0 sind doch auch &lt 50.
Frage die Zellen auf die echten Werte ab. 50%=0,5.
Wie kommen die Werte zustande? Formel oder Eingabe?
Gruß aus’m Pott
Udo

AW: vba
21.03.2016 22:14:43
Fennek
Hallo,
angenommen, die Spalte F ist frei, dann
F3: =verweis(e3;{-1;0,1;0,6;0,75;1};{1;2;3;4;5})
Und nach unten ziehen/kopieren.
Die Farbe setzen mit
Sub Jurgen()
lr = cells(rows.count, "E").end(xlup).row
For i = 3 to lr
Select case cells(i, "E")
Case 1
Cells(i, "E").interior.color = vbblue
Case 2
'genauso weiter bis case 5
End select
Next i
End Sub

Anzeige
weitere Infos
22.03.2016 05:21:27
Jürgen
Hallo danke an alle.
Also in der E3 die Formel drin =WENN(C3>0,1;100-D3;"k.Reserve") und sie Zelle mit 0 "%" Formatiert.
Die minus zahlen kommen zur Stande, weil Falsche werte im System stehen.
Deswegen BLAU damit die Kollegen den Fehler gleich bereinigen.
Können auch machen:
alles kleiner als 0 = blau
1 bis 60 = grün
61 bis 75 = gelb
76 bis 100 = rot.
Leider kann ich keine Hilfspalte verwenden, da bis Spalte AD alles belegt ist.
Danke euch

AW: weitere Infos
22.03.2016 10:32:54
Rudi
Hallo,
Leider kann ich keine Hilfspalte verwenden, da bis Spalte AD alles belegt ist.
und was ist mit AE:XFD ? Das sind doch noch 16354.

Anzeige
AW: weitere Infos
22.03.2016 12:29:56
Jürgen
Das würde gehen ab. AE :-)

frage
22.03.2016 15:11:20
Jürgen
Warum brauche ich eine hilfspalte?
Kann man nicht einfach sagen von bis diese Zahl dann Farbe?

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige