EXCEL VBA 查询
发布网友
发布时间：2022-04-20 23:10
共1个回答
热心网友
时间：2023-10-03 04:41
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、然后进行保存，点击运行就完成了。
