Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Eintrag nach Farben

Forumthread: Eintrag nach Farben

Eintrag nach Farben
23.09.2005 12:13:02
Josef
Hallo!
Ich habe in der SpalteA ca. 30000 Werte wobei ca. ein drittel gelb markiert ist.
Ich würde bitte folgende Formel suchen:
Wenn der Wert in SpalteA gelb markiert ist , dann soll in SpalteB daneben eine 1 geschrieben werden. Ist keine Markierung vorhanden, dann soll in spalte B kein Eintrag erfolgen.
Danke
Josef
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eintrag nach Farben
23.09.2005 12:16:51
Dr.
Hi,
so zum Beispiel (den ColorIndex musst Du entsprechend anpassen):

Sub test()
Dim c As Range
For Each c In ActiveSheet.Range("A:A")
If c.Interior.ColorIndex = 36 Then c.Offset(0, 1).Value = 1
Next
End Sub

AW: Eintrag nach Farben
23.09.2005 12:40:51
Josef
Hallo Dr.
Besten Dank für Deine Hilfe
Josef
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige