1。VBA(从显示列最后开始向上查找)
2。相同内容填充颜色
3。以最后一行来判断它上面的内容,相同的填充单元格颜色
http://pan.baidu.com/s/1jGpat2u
要vba方便
从最后行起
填充范围10行
tj=cells(cells(rows.count,"K").end(3).row,"K")
for i=cells(rows.count,"K").end(3).row-1,to 1 step -1
if instr(tj,cells(i,"k"))>0 then
range("K" & i).Interior.ColorIndex = 3
end if
next
for i=cells(rows.count,"K").end(3).row-1,to 1 step -1
追答for i=cells(rows.count,"K").end(3).row-1 to 1 step -1
多了个逗号