【发布时间】:2014-12-11 21:00:20
【问题描述】:
我有以下在 Excel 2007 中使用的 vba 代码。它运行良好。我想为用户增强这一点。
它目前隐藏了用户在表单中提交的所有已完成的行。该代码当前检查所有提交的数据行,如果用户提交了所有必要的数据,则隐藏该行。我想知道在哪里可以放置代码来执行此操作,但只能在可见行上?现在,每次运行宏时它都会检查所有这些,重新审查过去提交的通过检查的提交。我只需要它来查看新的数据行。
我是编写 vba 代码的新手,非常感谢如此简单的解释或放置位置的示例。
Dim lASTrOW As Long, C As Range
lASTrOW = Cells(Cells.Rows.Count, "A").End(xlUp).Row
On Error Resume Next
For Each C In Range("V4:V" & lASTrOW)
If C.Value = 0 Then
C.EntireRow.Hidden = True
ElseIf C.Value = "null" Then
C.EntireRow.Hidden = False
End If
Next
If C.Value = "null" Then
MsgBox "Visible rows contain missing data. Review and update."
End If
【问题讨论】: