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、然後進行保存，點擊運行就完成了。