If e.Col.Name = "ph值" Then '如果是分组行的数量列
If e.Row("ph值") <= 9 And e.Row("ph值") >=6 Then
e.Style = "1类"
ElseIf e.Row("ph值") > 9 Or e.Row("ph值") < 6 And e.Row("ph值") > 0.001 Then
e.Style = "5类"
End If
End If
If e.Col.Name = "溶解氧" Then '如果是分组行的数量列
If e.Row("溶解氧") < 100 And e.Row("溶解氧") >=7.5 Then
e.Style = "1类"
ElseIf e.Row("溶解氧") >= 6 And e.Row("溶解氧") < 7.5 Then
e.Style = "2类"
ElseIf e.Row("溶解氧") >= 5 And e.Row("溶解氧") < 6 Then
e.Style = "3类"
ElseIf e.Row("溶解氧") >= 3 And e.Row("溶解氧") < 5 Then
e.Style = "4类"
ElseIf e.Row("溶解氧") >= 2 And e.Row("溶解氧") < 3 Then
e.Style = "5类"
ElseIf e.Row("溶解氧") >= 0.001 And e.Row("溶解氧") < 2 Then
e.Style = "劣5类"
End If
End If
If e.Col.Name = "高猛酸盐指数" Then '如果是分组行的数量列
If e.Row("高猛酸盐指数") > 0.001 And e.Row("高猛酸盐指数") <= 2 Then
e.Style = "1类"
ElseIf e.Row("高猛酸盐指数") > 2 And e.Row("高猛酸盐指数") < = 4 Then
e.Style = "2类"
ElseIf e.Row("高猛酸盐指数") > 4 And e.Row("高猛酸盐指数") < = 6 Then
e.Style = "3类"
ElseIf e.Row("高猛酸盐指数") > 6 And e.Row("高猛酸盐指数") < = 10 Then
e.Style = "4类"
ElseIf e.Row("高猛酸盐指数") > 10 And e.Row("高猛酸盐指数") <= 15 Then
e.Style = "5类"
ElseIf e.Row("高猛酸盐指数") > 15 Then
e.Style = "劣5类"
End If
End If
“ph值 ”列、“溶解氧” 列可以正常按颜色显示，但 “高猛酸盐指数”列无反应？求助！
加好友 
发短信
Post By：2021/8/31 11:54:00 [只看该作者]
