Hide columns based on drop down list with various possibilities

[Mr.Magic]

Dear all,

I'm writing codes with as result that certain columns should be hidden when a specific choice is made in the drop down list.
Underneath the codes I use, which are very much simplified. In my real excel I have 7 in stead of 3 possibilities, and much much more columns to be hidden or to be shown.

Thanks a lot for helping me out!

CODE:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$B$2" Then

If LCase(Target.Text) = "All" Then

Columns("C").EntireColumn.Hidden = False
Columns("D").EntireColumn.Hidden = True
Columns("E").EntireColumn.Hidden = False

ElseIf LCase(Target.Text) = "Comptes bancaires" Then

Columns("C").EntireColumn.Hidden = True
Columns("D").EntireColumn.Hidden = False
Columns("E").EntireColumn.Hidden = False

ElseIf LCase(Target.Text) = "Terms deposit" Then

Columns("C").EntireColumn.Hidden = False
Columns("D").EntireColumn.Hidden = False
Columns("E").EntireColumn.Hidden = True

End if
End if
End sub

 

[rs2k]

Not quite sure what you are asking here
Adapt the code to match your 'Names' in the validation and give it a try;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Range("B2").Value
Case Is = "Monday"
Columns("C:AA").EntireColumn.Hidden = False
Columns("D:M").EntireColumn.Hidden = True
Columns("G").EntireColumn.Hidden = False
Case Is = "Tuesday"
Columns("C:AA").EntireColumn.Hidden = False
Columns("C:Q").EntireColumn.Hidden = True
Columns("F").EntireColumn.Hidden = False
Case Is = "Wednesday"
Columns("C:AA").EntireColumn.Hidden = False
Columns("E:T").EntireColumn.Hidden = True
Columns("I").EntireColumn.Hidden = False
Case Is = "Thursday"
Columns("C:AA").EntireColumn.Hidden = False
Columns("D:M").EntireColumn.Hidden = True
Columns("K").EntireColumn.Hidden = False
End Select
End Sub

HTH
Colin

 

[Mr.Magic]

Works perfect!

Huge thanks, I knew it was something small (change code to Case is)

 

[Jewelzzz00]

i m sorry this is laymen, but is this code for a macro?

i am using a macro enabled workbook, which now i enabled the track changes feature.
this disables macro's (as per a popup msg when you click okay to enable.)
So the when its opened it says SHARED on it.

I need to hide columns based on pull down list from previous column.

Can i do that and still share and track changes ?

TY - Juliana