EXCEL里VB,查找某列为空的单元格,并标注单元格底色为黄色,小白请大神指点。完整代码?
展开全部
Private Sub CommandButton21_Click()
For i = 1 To 100
If Len(Cells(i, 1).Text) = 0 Then
Cells(i, 1).Interior.Color = RGB(255, 255, 0)
End If
Next
End Sub
加个按钮,双击粘贴进去,我这是对第一列,第几列你自己改 如果多列加个for循环
这个用条件格式就能搞定,干嘛写VBA啊
For i = 1 To 100
If Len(Cells(i, 1).Text) = 0 Then
Cells(i, 1).Interior.Color = RGB(255, 255, 0)
End If
Next
End Sub
加个按钮,双击粘贴进去,我这是对第一列,第几列你自己改 如果多列加个for循环
这个用条件格式就能搞定,干嘛写VBA啊
追问
不加按钮,直接运行可不可以?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询