Fontfarbe abfragen



Excel-Version: 2000
nach unten

Betrifft: Fontfarbe abfragen
von: Thomas
Geschrieben am: 17.04.2002 - 18:56:24

hallo

wie kann ich mit vba die fontfarbe abfragen ?
ich will in einer zelle testen, ob der font die farbe 3 (rot) hat...

wie stelle ich das denn an ?


nach oben   nach unten

Re: Fontfarbe abfragen
von: Klaus-Dieter
Geschrieben am: 17.04.2002 - 19:03:06

Hallo Thomas, z.B. so:
Sub farbsuche() z = 2 Do While Cells(z, 1) <> ""     If Cells(z, 1).Font.ColorIndex = 3 Then Cells(z, 2) = "OK" z = z + 1 Loop End Sub
Gruß Klaus-Dieter http://www.klaus-dieter-2000.de (Excel und VBA speziell für Einsteiger)

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Fontfarbe abfragen"