Sub 宏1()
Cells.FormatConditions.Delete
Cells(2, 1).Select
Selection.FormatConditions.AddIconSetCondition
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1)
.ReverseOrder = False
.ShowIconOnly = False
.IconSet = ActiveWorkbook.IconSets(xl3TrafficLights1)
End With
With Selection.FormatConditions(1).IconCriteria(2)
.Type = xlConditionValueFormula
.Value = "=INDIRECT(""B2"")"
.Operator = 7
End With
With Selection.FormatConditions(1).IconCriteria(3)
.Type = xlConditionValueFormula
.Value = "=INDIRECT(""C2"")"
.Operator = 7
End With
End Sub
程序中的=INDIRECT(""B2"")和=INDIRECT(""C2"")能改成循环吗？能改的话如何改，新手一枚，感谢哪位大神指教一下