VBA to hide colums based on dropdown list value

[Edmund]

Hi there,

I need vba automatically hide colums based on dropdown list value. Thanks in advance.

 

[Snakehips]

@Edmund. Maybe try this.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
Set MyRange = Range("E3:P3")

If Intersect(Target, Range("C3")) Is Nothing Then Exit Sub

Application.ScreenUpdating = False
MyRange.EntireColumn.Hidden = False
For Each Cell In MyRange
    If Not Cell = Target Then
        Cell.EntireColumn.Hidden = True
        c = c + 1
    End If
Next Cell
'unhide if c3 not a truck
If c = MyRange.Columns.Count Then MyRange.Columns.EntireColumn.Hidden = False

Application.ScreenUpdating = True

End Sub

 

[Edmund]

It works great, thanks so much