摘要: 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( 阅读全文
posted @ 2010-05-26 19:37 dzqabc 阅读(286) 评论(0) 推荐(0) 编辑