如何创建一个满足2个条件/单元格(有多个目标地址)时隐藏单元格的宏

时间:2019-03-17 23:49:13

标签: vba

Sub Worksheet_Change(ByVal Target As Range)

    If Target.Address = "$E$22" AND  If Target.Address = "$B$22" Then
        If UCase(Target) = "NO" Then
            Rows("23").EntireRow.Hidden = True

        Else
            Rows("23").EntireRow.Hidden = False

        End If
    End If

1 个答案:

答案 0 :(得分:0)

对于该特定示例,可以使用两个选项:

If Target.Address = "$E$22" OR Target.Address = "$B$22" Then

如果您有更多内容,请使用CASE语句:

Select Case Target.Address
    Case "$E$22"
        'Do Something
    Case "$B$22"
        'Do Something Else
End Select

根据需要输入尽可能多的内容,如果您需要它在不符合任何条件的情况下执行某些操作,则将最后一个Case设为结束选择之前的Case Else