你要红字单元格干吗？用VBA好处理。如If Cells(j, i).Font.ColorIndex =3 Then‘你做什么End If
参考https://zhidao.baidu.com/question/129987003.html
