Dependent Data Validation List & ByVal Sub

[crburke92]

Hey all,

I have a Data Validation list on one of my sheets in Cell B1 that drives a ByVal Sub:

Private Sub Worksheet_Change(ByVal Target As Range)

If Range("B1").Value = "All" Then
Range("ALL").EntireColumn.Hidden = False
    ElseIf Range("B1") = "HV Breakers" Then
        Range("ALL").EntireColumn.Hidden = True
        Range("HVBREAKERS").EntireColumn.Hidden = False
    ElseIf Range("B1") = "HV Breaker W/ Timing" Then
        Range("ALL").EntireColumn.Hidden = True
        Range("HVBREAKERWTIMING").EntireColumn.Hidden = False
    ElseIf Range("B1") = "LV Breakers" Then
        Range("ALL").EntireColumn.Hidden = True
        Range("LVBREAKER").EntireColumn.Hidden = False
        End If
End Sub

This was working fine until I hit the character limit for my list (Just a portion of code, actually much longer). When I changed my list formula to =SheetList!$A$1:$A$24 to allow for a longer list, my sheet stopped updating. Any fix for this?

 

[Fluff]

Glad you sorted it & thanks for the feedback.