Excel突出显示更改条件的公式

时间:2016-06-20 02:38:26

标签: excel formula highlight conditional-formatting

我有22个表,它们都具有相同的参数但值不同。对于列F-M中存在的值,每个参数具有导出的第20,第50和第80百分位数(列C-E)。

示例:

Table 1 Table 2

我试图突出显示其各自的第80百分位数以上的所有单元格,而不必为22个表格中的每个表格中的每个参数重复条件格式。例如,对于表1中的钙,细胞F8和M8在细胞E8中高于第80百分位,并且应该突出显示。在表2中,钙80百分位数(细胞E36)是不同的,仅应突出显示J36和K36。我可以通过条件格式化钙22次(每个表一次)来做到这一点,但这需要永远,因为我需要为每个参数做。

我还应该提到表格完全相同,这意味着每28个细胞重新出现每个参数(即表A 1 A8中的钙,表2中A36中的钙,表3中的钙A64等)。

如果不够清楚或者您需要更多信息,请告诉我。任何帮助表示赞赏!

1 个答案:

答案 0 :(得分:1)

您可以使用此vba脚本:

Sub Button_Click()
    Dim cell As Range
    Dim row As Integer
    Dim val80th As Double

    For row = 1 To 2000
        Select Case Range("A" & row)
            Case "Calcium", "Magnesium", "Sodium", "Potassium"
                val80th = Range("E" & row)
                HighlightValues row, val80th
        End Select
    Next row
End Sub

Sub HighlightValues(row As Integer, val As Double)
    For col = 6 To 13 ' 6 = col F // 13 = col M
        If Cells(row, col) > val Then
            Cells(row, col).Interior.ColorIndex = 37
        End If
    Next col
End Sub