ich möchte der Zeile, in der ich mich befinde, von Spalte A bis Spalte K eine Füllfarbe zuweisen und in der Zelle der Spalte K einen festgelegten Inhalt einfügen (z.B. "geprüft".
Wie bekomme ich das hin?
Thx 4 hlp
Buggy
Sub test()
Dim z As Long
z = ActiveCell.Row
Range(Cells(z, 1), Cells(z, 11)).Interior.ColorIndex = 4
Cells(z, 11).Value = "geprüft"
End Sub