我需要突出显示每3行中的所有最小值单元格。我尝试使用条件格式。这是我输入的公式:
图片
如图所示,我试图为整个单元格设置两个不同的公式;第一个公式用于定义每三行,第二个公式用于突出显示三行中的最小值。
但这似乎不起作用。有没有更好的方法来解决这个问题?
答案 0 :(得分:1)
如果我正确理解您的问题,则可以使用OFFSET
创建每个3行的范围来实现。
示例:
向下G2
的公式:
=INT((ROW(A2)-ROW($A$2))/3)*3
向下I2
的公式:
=MIN(OFFSET($A$2,INT((ROW(A2)-ROW($A$2))/3)*3,0,3,COLUMNS($A:$E)))
请注意,这些公式仅用于了解该方法的工作原理。它们不是辅助列,并且不需要用于条件格式。
应用于范围=$A$2:$E$13
的条件格式公式如下:
=(A2=MIN(OFFSET($A$2,INT((ROW(A2)-ROW($A$2))/3)*3,0,3,COLUMNS($A:$E))))
答案 1 :(得分:0)
您可以尝试:
Option Explicit
Sub test()
Dim i As Long, min As Long, LR As Long
Dim rng As Range, cell As Range
With ThisWorkbook.Worksheets("Sheet1")
LR = .Cells(.Rows.Count, "A").End(xlUp).Row
For i = 1 To LR Step 3
Set rng = .Range("A" & i & ":A" & i + 2)
min = Application.WorksheetFunction.min(rng)
For Each cell In rng
If cell.Value = min Then
cell.Interior.Color = vbGreen
Exit For
End If
Next cell
Next i
End With
End Sub