我想根据上一个单元格中的值隐藏或显示行

时间:2019-05-07 18:59:12

标签: excel vba excel-formula

我有一个交互式工作表,可以让人们输入是或否的答案。我有一组问题,如果有人在第一个回答中不回答,则不需要后面两个。我该如何创建一个函数,一旦给出否,该函数将隐藏行?

我对Excel中的高级功能还比较陌生,因此我主要关注的是同事们提供的不同形式的代码。

    ActiveSheet.Range("B6") = "no"
    Rows("7:8").EntireRow.Hidden = False
End Function

1 个答案:

答案 0 :(得分:0)

我认为您正在寻找Worksheet_Change()事件-尝试将其放在Microsoft Excel对象下的相应工作表模块中:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$B$6" Then
        If Target.Value = "no" Then
            Rows("7:8").EntireRow.Hidden = True
        Else
            Rows("7:8").EntireRow.Hidden = False
        End If
    End If

End Sub