Сокрытие строк на основе выпадающего

Question

У меня есть лист, где мне нужно скрыть определенные строки на основе раскрывающегося списка. Код, который я использую для этого, приведен ниже:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("B3")) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
            X = Target.Value
            If X = "" Or X = "1" Then Rows("10:10").Hidden = True
    End If

    If Not Intersect(Target, Range("B2")) Is Nothing Then
       Y = Target.Value
       If Y <> "California" Then Rows("16:16").Hidden = True
       If Y <> "Florida" Then Rows("16:16").Hidden = True
    End If

End Sub

Проблема, с которой я сталкиваюсь, заключается в том, что я выбираю количество владельцев строк, скрытых из-за состояния выбор скрывает Есть ли что-то, что я не вижу, чтобы предотвратить это?

РЕДАКТИРОВАТЬ: Обновлен код, чтобы включить предложенные комментарии. Теперь любой выбор, который я выбираю, скрывает строку 16 и не показывает.

Answer 1

Благодаря BigBen я выяснил, где я ошибаюсь.

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.CountLarge > 1 Then Exit Sub
        If Not Intersect(Target, Range("B3")) Is Nothing Then
            X = Target.Value
            If X = "" Or X = "1" Then Rows("11:11").Hidden = True
            If X = "2" Then Rows("11:11").Hidden = False
        End If

        If Not Intersect(Target, Range("B2")) Is Nothing Then
            Y = Target.Value
            If Y <> "California" Then Rows("16:16").Hidden = True
            If Y <> "Florida" Then Rows("16:16").Hidden = True
            If Y = "California" Then Rows("16:16").Hidden = False
            If Y = "Florida" Then Rows("16:16").Hidden = False
        End If

End Sub

Это работает так, как мне нужно. Я не учел показывать, когда было выбрано правильное состояние.