Multiple Rows to hide in VB

[GlennY]

I have a dropdown with 2 selections (PHYSICAL & VIRTUAL).
If Physical is selected i need to hide rows 31 thru 70 and display rows 13 thru 30
If Virtual is selected i need to hide rows 13 thru 30 and display rows 31 thru 70.

I am trying to do this in the Microsoft VB code (below) but i cannot get it to work properly.


If Not Intersect(Target, Range("B11")) Is Nothing Then
If Range("B11") = "Virtual" Then
Rows("31:70").Hidden = False
Else
Rows("13:30").Hidden = True
End If
End If

 

[VoG]

Try

If Not Intersect(Target, Range("B11")) Is Nothing Then
    If Range("B11") = "Virtual" Then
        Rows("31:70").Hidden = False
        Rows("13:30").Hidden = True
    Else
        Rows("13:30").Hidden = False
        Rows("31:70").Hidden = True
    End If
End If

 

[pgc01]

Hi

Try:

If Not Intersect(Target, Range("B11")) Is Nothing Then
    Rows("13:30").Hidden = (Range("B11") = "Virtual")
    Rows("31:70").Hidden = (Range("B11") = "Physical")
End If

 

[GlennY]

Beautiful.

Thanks for your help