☰

Excel VBA - 根据另一行的值查看隐藏特定行

tag-icon • tag-icon microsoft-excel vba
Excel VBA - 根据另一行的值查看隐藏特定行

我一直在努力尝试并让任何事情发挥作用并希望有人能有一个想法。

如果 C5 有值，我需要使第 6、106 和 107 行可见。然后我需要检查 C6 是否有值，如果是，则使下一行可见，依此类推，直到达到第 106 行。

所有这些都将在 Private Sub Worksheet_Change(ByVal Target as Range) 下运行。

我希望这是有意义的，任何帮助都将不胜感激。

谢谢

德鲁

答案1

这将取消隐藏 C5 上三行的变化，然后随着 C 的变化取消隐藏下一行：

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Range("C5"), Target) Is Nothing Then
    Rows(6).Hidden = Target.Value = ""
    Rows("106:107").Hidden = Target.Value = ""

End If
If Not Intersect(Range("C6:C105"), Target) Is Nothing Then
    Rows(Target.Row + 1).Hidden = Target.Value = ""
End If


End Sub

相关内容