Public Sub fktvergleiche()
Dim intZeile As Integer
Dim intFarbe As Integer
For intZeile = 1 To 10
If Cells(intZeile, 1).Value <> Cells(1, 1).Value Then
For intFarbe = 1 To 10
Cells(intFarbe, 1).Interior.ColorIndex = 4 ' grün
Next
Exit Sub
End If
Next
For intFarbe = 1 To 10
Cells(intFarbe, 1).Interior.ColorIndex = 3 'rotfärben
Next
End Sub
Felder in excel?
unihauke 23.03.2007 - 78 Hits - 10 Antworten
Excel - Daten vergleichen und niedrigsten Wert markieren
Racerking33 11.04.2007 - 355 Hits - 1 Antwort
Werte einer Tabelle vergleichen und in einer anderen Tabelle zusammenfügen
RalfH 31.05.2007 - 228 Hits - 1 Antwort
excel dateien vergleichen
trini9 30.08.2007 - 658 Hits - 2 Antworten
2 Excel Tabellen vergleichen und identische Zellen farbig hinterlegen
Chris23 02.02.2008 - 1566 Hits - 3 Antworten