VBA Excel - 更改确定范围内行的每个第一个值的颜色

Question

我试图想出一些东西让VBA在一个确定的范围内改变一行中每个第一个条目的颜色。基本上，它应该通过不同的行，每次它确实找到第一个条目改变它的颜色。如果它没有找到任何条目，它应该继续下一行。

要想象：

这就是它目前的样子

这就是我希望它看待VBA代码完成它的工作。

那怎么办？任何帮助表示赞赏。提前谢谢。

Answer 1

假设你有从C列开始的数字，

Sub highlight()
Dim i As Long, j As Long
For j = 2 To Cells(Rows.Count, 1).End(xlUp).Row
For i = 3 To 256
    If Cells(j, i) <> "" Then
        Cells(j, i).Interior.ColorIndex = 3
        Exit For
    End If
Next i
Next j
End Sub

如果不相应调整公式