vba - zellformat
Jonas
Habe mich erst kürzlich angefangen mit VBA auseinanderzusetzen und jetzt folgendes Problem: Es soll die ganze Zeile fomatiert werden sobald etwas in der zelle x am ende der spalte steht.
Das ist der Programmcode (ich hoffe, dass jemand damit etwas anfangen kann):
Sub Virenliste()
Dim z As Boolean
Dim i As Integer
i = 2
For i = 2 To 63
z = Cells(9, i).Value
Select Case z
Case z = True
Range("i").Rows.Font.Color = vbGreen
Case z = False
Range("i").Rows.Font.Color = vbRed
End Select
Next i
End Sub
Beim debuggen wird Laufzeitfehler "13" angezeigt (typen unverträglich). Kann man den Typ boolean in einem Case-Konstruckt verwenden?Danke im Vorraus!