Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
764to768
764to768
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen mit Farben ermitteln

Forumthread: Zellen mit Farben ermitteln

Zellen mit Farben ermitteln
18.05.2006 08:59:01
Torge
Hallo,
Frage: gibt es eine Möglichkeit mittels VBA in einem Tabellenblatt in Spalte A, dort in Zelle A1 bis A25 die Zellen zu ermitteln, welche mit Blau, Rot, Grün oder garkeine Farbe enthalten! d.h. ich möchte gern ermitteln in wievielen Zellen die gleiche Farbe bzw. keine Farbe vorkommt. Das ermitteln soll aber, wenn möglich mit VBA erfolgen
Vielen Dank an dieser Stelle.
Gruß Torge
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen mit Farben ermitteln
18.05.2006 09:05:28
Dr.
Hi,
mal als Ansatz:

Private Sub CommandButton1_Click()
i = 0
Dim c As Range
For Each c In Range("A1:A10")
If c.Interior.ColorIndex > 0 Then i = i + 1
Next c
MsgBox i * Range("b13").Value
End Sub

AW: Zellen mit Farben ermitteln
18.05.2006 10:02:51
Torge
Hallo,
vielen Dank für den Ansatz. Aber nun ist folgendes Problem: ich hätte es gern so, dass ermittelt wird, wie oft ist in der Spalte die Farbe Rot oder Grün oder Blau vorhanden. Die Medung sollt dann nicht mittels Button angzeigt werden, sondern mit einer MsgBox.
Hättest Du hier noch eine Lösungsvorschlag?
Vielen Dank schon mal.
Gruß Torge
Anzeige
AW: Zellen mit Farben ermitteln
18.05.2006 10:09:22
Dr. 

Private Sub CommandButton1_Click()
rot = 0
gruen = 0
blau = 0
Dim c As Range
For Each c In Range("A:A")
If c.Interior.ColorIndex = 3 Then rot = rot + 1
If c.Interior.ColorIndex = 4 Then gruen = gruen + 1
If c.Interior.ColorIndex = 5 Then blau = blau + 1
Next c
MsgBox rot & "mal rot, " & gruen & " mal grün, " & blau & " mal blau."
End Sub

Anzeige
AW: Zellen mit Farben ermitteln
18.05.2006 10:57:47
Torge
Hallo und Danke schon mal.
Bekomme bei Test eine Fehlermeldung rot = 0 Variable nicht definiert.
Was muss ich da ändern?
Danke und Gruß Torge
AW: Zellen mit Farben ermitteln
18.05.2006 11:05:46
Dr.
Also entweder dimensionierst Du die Variablen noch, oder Du schmeißt das Option Explicit aus dem Code.
AW: Zellen mit Farben ermitteln
18.05.2006 14:02:14
Torge
Alles klar, werd es versuchen und hoffe ich komme dann weiter.
Vielen Dank
Gruß Torge
Anzeige
;

Forumthreads zu verwandten Themen

Zelleninhalte abwechselnd mit der Füllfarbe... ?
Selma

Hallo Leute,
in Spalte A habe ich ganz viele Einträge. Jetzt möchte ich von Zelle in der am Anfang dies <artikel name steht bis Zelle wo es am Anfang dies steht in Füllfarbe gelb und den nächsten Abschnitt mit der Füllfarbe grün darstellen. Dies soll immer abwechselnd bis letzte Zelle d...
07.10.2008 10:00:00
Thread-ID: 1014628
11 Beiträge
zellen mit gleicher Farbe leeren
serge

Hallo Leute
Ich suche eine Möglichkeit alle freien Zellen mit gleicher Farbe zu leeren!
Wer kennt einen Code dazu
Danke
Serge
11.12.2008 10:45:00
Thread-ID: 1031974
5 Beiträge
Farbige Zellen zählen
Erich

Hallo,
ich habe da ein Problem: In Spalte D von Zeile 9 bis 242 befinden sich weiße, braune und violette Zellen. Die violetten Zellen sollen nun gezählt werden. Die Stückzahl der violetten Zellen soll nun mittels Formel ermittelt werden.
Ich bitte um Hilfe.
Gruß EM
09.07.2009 14:09:04
Thread-ID: 1087433
5 Beiträge
Zellen mit Farbe füllen
Karsten

Hallo,
ich möchte, wenn in der aktiven Zelle "Montag" steht, dass sie und die linken 11 Zellen sich mit Farbe 38 füllen. Steht Dienstag, dann dasselbe, nur mi Farbe 8.
Kann mir da jemand mit dem richtigen Befehl weiterhelfen?
Gruß
Karsten
25.07.2009 15:05:43
Thread-ID: 1091238
18 Beiträge
farbige zellen zählen
otto

Hi,
ich such eine Möglichkeit per Formel (ohne VBA) in einer Zeile alle roten Zellen zu zählen. Die Zellen enthalten aber keine Werte.
Gruß
otto
07.09.2009 13:46:55
Thread-ID: 1101019
3 Beiträge
Zählenwenn mit getrennten Zellen
petra

hallo,
ich bräuchte mal eure hilfe...
und zwar würde ich gerne bereiche zählen lassen, die größer als 0 sind...
dabei liegen die Zellen die durchsucht werden sollen nicht direkt aneinander, sondern mit erheblichen zellenabständen.
also zum beispiel
zelle b9
zelle b59
...
11.09.2009 12:25:25
Thread-ID: 1101979
10 Beiträge
Anzeige
Zellen mit Textfarbe zählen?
dieter(drummer)

Excel/VBA SoLaLa
Hi Exel/VBA Profis,
Ausgangspunkt: In den Zellen B3 bis U22 sind Buchstaben (immer nur 1 Buchstabe je Zelle!). Einige davon werden manuell auf Schriftfarbe ROT gesetzt.
Mein Problem: Wie erhalte ich die Summe der Zellen (Anzahl) im Bereich B3 bis U22 der aktiven Ta...
16.09.2009 17:12:59
Thread-ID: 1103294
8 Beiträge
Farbige Zellen zählen
Walter

Hallo Excelfreunde,
Ich erzeuge per bedingter Formatierung farbige Zellen.
Kann man die Werte dieser Zellen zählen?
Gruß
Walter
28.09.2009 21:57:52
Thread-ID: 1106093
11 Beiträge
Zellen mit Werten zählen
Werner

Hallo zusammen!
Ich suche jetzt seit 2 Tagen nach einer Lösung aber ich finde nichts (oder ich bin blind).
In Bereich B21 bis B200 stehen Namen.
Diese ziehe ich mit der Formel (z. B.) =AQ21 usw. aus einem anderen Bereich.
Zwischendurch sind auch mal Zeilen ohne Namen aber immer...
11.11.2009 09:29:32
Thread-ID: 1116077
11 Beiträge
Einzelne Wochentage aus Zellen mit Datum zählen
Karli

Hallo,
ich habe, um die Anzahl der einzelnen Wochentage in einer Spalte mit Datumangaben zu ermitteln, die Daten in einer anderen Spalte in Text umgewandelt, und dann Montage, Dienstage usw. gezählt.
Gibt es dafür auch einen direkten Weg die Summe bzw. Anzahl der einzelnen Wochentage in...
14.12.2009 21:03:03
Thread-ID: 1123898
6 Beiträge
ZÄHLENWENN mit bestimmten Zellen
Fred

Hallo,
wenn ich mit ZÄHLENWENN nur bestimmte Zellen anspreche, erhalte ich einen #WERT!-Fehler.
z.B. =ZÄHLENWENN(F4;F8;F12;F16;F20;"7:30")
Kann ZÄHLENWENN so etwas nicht berücksichtigen ?
Wie kann man das sonst lösen ?
GRUß
Fred
07.03.2010 10:26:48
Thread-ID: 1144061
11 Beiträge
Farbige Zellen zählen
Gunnar

Hallo Zusammen,
ich hab mal wieder ein Problem, bei dessen Lösung ich auf eure Hilfe hoffe.
Folgenden Code verwende ich um farbige Zellen in den Spalten A, B und C (jeweils 1 - 10) zu zählen.
Function CountCellColor(rng As Range, iColor As Integer) As Double Dim rngAct As Range Dim...
04.05.2010 12:33:33
Thread-ID: 1155316
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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