间隔色标记相同数据行
实例需求:如果D列相邻单元格内容相同,并且对应的E列单元格内容也相同,并且D列不为空,那么D列、E列和G列相应行使用间隔颜色进行标记,如下图所示。示例代码如下。Sub demo() lst = [a1].End(xlDown).Row arr = Range("d1:d" & lst) Range("b3:L" & lst).Interior.Color = xlNone Set dic = CreateObject("scripting.diction