online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon SSL08 vom 11.02.2020, 11:53 Options

Excel Werte vergleichen

In einer Spalte stehen 10 Werte. Sind alle Werte gleich soll der Wintergrund grün gefärbt sein. Ist ein oder mehrere Werte verschieden soll der Hintergrund rot gefärbt werden.


Antwort schreiben

Antwort 1 von Marie vom 11.02.2020, 17:00 Options

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


Gruß Marie

Ähnliche Themen

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

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

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Sun Jan 25 18:15:21 2026