摘要:
Option ExplicitSub Macro2() Dim i As Integer For i = 5 To 219 With ActiveSheet.Range("C" & CStr(i)) .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:="=AND(($C$" & CStr(i) & "=$E$" & CStr(i) & "),($E$" & CStr( 阅读全文