dieses forum ist echt klasse!
diesmal möchte ich zellen einfärben z.B. schwarz, aber nur jene zellen, die den Einzelbuchstaben A einhalten....
geht das?
lg
zeinz
If Cells(x,y) = "A" then
Cells(x,y).Interior.Color = vbBlack
End If
Sub test()
For i = 1 To Cells(Cells.Rows.Count, 1).End(xlUp).Row
If Cells(i, 1) = "A" Then
Cells(i, 1).Interior.Color = vbBlack
End If
Next
End Sub
...färbt alle Zellen der Spalte A mit Merkmal "A"