我有一张工作表，在 T 列中，我想突出显示包含“ok”的单元格。
我有一个代码，它与 internal.color 一起工作正常，但未能突出显示包含“OK”的单元格，而是突出显示而不考虑单元格值。
任何人都可以建议，我的代码有什么问题？
Sub colour()
Dim totalrows As Long
totalrows = Sheets("S1").Cells(Rows.Count, "T").End(xlUp).Row
With Range("T5:T" & totalrows)
.Value = "OK"
Range("T5:T" & totalrows).Interior.Color = RGB(0, 255, 0)
End With
End Sub
试试这个：
Sub colour()
Dim totalrows As Long
Dim cel As Range
totalrows = Sheets("S1").Cells(Rows.Count, "T").End(xlUp).Row
For Each cel In Range("T5:T" & totalrows)
If cel.Value = "OK" Then
cel.Interior.Color = RGB(0, 255, 0)
End If
Next cel
End Sub
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句