如果该行中的单元格小于某个值，则为某行的宏添加条件格式

Question

我很难在宏中找到正确的方法。我知道我可以进行条件格式化，但我正在尝试节省一些时间，并且有一个宏来完成大部分工作，所有我需要做的就是放在备注中。我已经阅读了其他一些帖子，但找不到对我有用的东西，而且我并不擅长理解Macros，只是开始搞乱它们。我也尝试将该过程记录为宏，但这不起作用。

从N2开始，我想要发生什么;

如果N列中的单元格小于3，则突出显示整行绿色

如果N列中的单元格为4或5，则突出显示整行黄色

如果N列中的单元格大于5，则突出显示整行红色

Answer 1

尝试

Sub Demo()
    Dim ws As Worksheet
    Dim lastRow As Long
    Dim cel As Range

    Set ws = ThisWorkbook.Sheets("Sheet2")  'change Sheet2 to your data sheet
    With ws
        lastRow = .Cells(.Rows.Count, "N").End(xlUp).Row  'last row in Column N
        For Each cel In .Range("N2:N" & lastRow)    'loop through all values in Column N
            If cel.Value <= 3 Then                  'if cell value is less than or equal to 3
                cel.EntireRow.Interior.Color = vbGreen  'color entire row with green color
            ElseIf cel.Value = 4 Or cel.Value = 5 Then  'if cell value is equal to 4 or 5
                cel.EntireRow.Interior.Color = vbYellow 'color entire row with green yellow
            Else                                        'any othe cell value i.e. cell value greater then 5
                cel.EntireRow.Interior.Color = vbRed    'color entire row with green red
            End If
        Next cel
    End With
End Sub

参见图片以供参考。