1、首先打开需要编辑的Excel表格,进入到编辑的的页面中。
2、然后在弹出来的窗口中,鼠标右键单击工作表,选择打开“查看代码”。
3、然后在弹出来的窗口中,点击输入代码:
Sub AAA()
Dim I As Long
For I = 1 To 1000 '行 范围,自己修改
If InStr(Range("A" & I), "invalidstatus") > 0 Then
Range("A" & I).Font.Color = vbRed
End If
Next
End Sub
4、然后进行保存,点击运行就完成了。