Hey Zusammen,
habe dieses Makro letzte Woche mit Eurer Unterstützung
erhalten, hier wird das Datum der Spalte K mit der Spalte L verglichen, wenn es kleiner ist in K wird die
Zelle gelb makiert.
Jetzt möchte ich gern Spalte B mit C vergleichen, wenn der gleiche Name oder die Nummer gleich ist,
soll die Zelle in Spalte B gelb werden.
Ich pack das Irgendwie nicht,
gr Kurt P
Sub Suchen_Namen__Doppelt_Gelb()
Dim x As Long
Dim C As Variant
x = 0
For Each C In Range("K6:K" & Cells(Rows.Count, 11).End(xlUp).Row)
'--C.Value < C.Offset(0, 1)-- für vergleich zur nächsten Spalte Rechts--
If C.Value < C.Offset(0, 1).Value Then C.Interior.ColorIndex = 6: x = x + 1
Next
MsgBox "gefunden " & x & " mal kleiner Daten in K als in L"