Anzeige
Archiv - Navigation
1052to1056
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
Inhaltsverzeichnis

Zeilen bei Übereinstimmung mit Farbe versehen ?

Zeilen bei Übereinstimmung mit Farbe versehen ?
26.02.2009 10:43:38
Günther
Guten Tag zusammen,
ich bitte um Hilfe bei diesem Problem:
Von Zelle D3:D1000 und A3:A1000 stehen Nummern.
Die Nummern aus Spalte A sollen nun mit denen aus Spalte D verglichen werden.
Bei Übereinstimmung sollten die Zeilen mit gelber Hintergrundfarbe versehen werden.
Beispiel:
A.........D
1326...1234
1327...1326...(Übereinstimmung = Zeile gelb)
1458...1327...(Übereinstimmung = Zeile gelb)
...........1327...(Übereinstimmung = Zeile gelb)
...........1698
...........1326...(Übereinstimmung = Zeile gelb)
In Spalte D können die Nummern mehrfach erscheinen.
Vielen Dank
Gruß Günther

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen bei Übereinstimmung mit Farbe versehen ?
26.02.2009 10:52:35
harry
Hallo Günther,

Sub main()
'Durchlauf alle Werte in Spalte A
For zeile = 3 To 1000
wert = Cells(zeile, 1)
'Durchlauf alle Werte in Spalte D
For zeile1 = 3 To 1000
'Wenn Übereinstimmung, dann Einfärben
If Cells(zeile1, 4) = wert Then
Cells(zeile1, 4).Interior.ColorIndex = 5
End If
Next
Next
End Sub


das ist eine Möglichkeit
Gruß
harry

AW: Zeilen bei Übereinstimmung mit Farbe versehen ?
26.02.2009 11:40:11
Günther
Hallo Harry,
danke für deinen Vorschlag, funktioniert soweit wunderbar.
Was muss ich ändern damit nicht nur die Zellen markiert werden,
sondern die komplette Zeile?
Gruß Günther
Anzeige
AW: Zeilen bei Übereinstimmung mit Farbe versehen ?
26.02.2009 11:43:59
harry
Hallo Günther,
cells(zeile1,4).entirerow.interior.colorindex=5
Gruß
harry
AW: Zeilen bei Übereinstimmung mit Farbe versehen ?
26.02.2009 11:59:26
Günther
Hallo Harry,
danke für die schnelle Antwort.
Jetzt ist es perfekt.
Gruß
Günther

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige