Hallo Zusammen,
ich bin ein absoluter Beginner bei VBA und hab ne Frage an euch.
In einer Tabelle werden rote und schwarze Werte angezeigt.
Excel soll nun alle roten Werte, abhängig von zwei Komponenten (der Farbe und der Grösse) zusammenzählen und in einer Liste anzeigen.
Ich hab das mal hiermit probiert, um die roten Zahlen mal generell zu zählen, aber das funkt schon nicht.
Sub Font_red()
Count = 0
For Each cell In Range("E39:E76")
If cell.Font.ColorIndex = 3 Then
Count = Count + 1
End If
Next cell
Cells(80, 5).Value = Count
End Sub
Kann mir jemand bitte bitte helfen.
Danke schön Marie |