Unhiding columns on multiple tabs dependent on selection of dropdown list in 1 tab

Hi all,

I have a worksheet with multiple tabs that I need to be able to unhide columns in depending on the selection of a dropdown list in the first tab. The dropdown list is in "F4" in sheet 1 labelled "Part 1". Depending on how many businesses the user is reporting for, they select that number from the dropdown and that subsequently unhides all the relevent rows on the following tabs labelled "Part 2", "Part 3" etc...

I've managed to get the first bit of code working for Part 1 (below in the code tags), but now I want to extend this to the "Part 2". The following columns need to be unhidden/hidden in "Part 2" for the following selections in F4 of "Part 1":

Case Is = "2"
Columns("A:AW").EntireColumn.Hidden = False
Columns("AX:FB").EntireColumn.Hidden = True
Case Is = "3"
Columns("A:BS").EntireColumn.Hidden = False
Columns("BT:FB").EntireColumn.Hidden = True
Case Is = "4"
Columns("A:CO").EntireColumn.Hidden = False
Columns("CP:FB").EntireColumn.Hidden = True
Case Is = "5"
Columns("A:DK").EntireColumn.Hidden = False
Columns("DL:FB").EntireColumn.Hidden = True
Case Is = "6"
Columns("A:EG").EntireColumn.Hidden = False
Columns("EH:FB").EntireColumn.Hidden = True
Case Is = "7"
Columns("A:"FA).EntireColumn.Hidden = False
Columns("FB:FB").EntireColumn.Hidden = True

Code for "Sheet 1"

Please Login or Register  to view this content.

Thanks for the help everyone