How to use switch case in VBA

        
 Please paste these lines in VBA macro.

Select Case nowMonth
       
        Case 1
       
        Columns("H:K").EntireColumn.Hidden = False
       
        Case 2
        Columns("L:O").EntireColumn.Hidden = False
       
        Case 3
        Columns("P:S").EntireColumn.Hidden = False
       
        Case 4
        Columns("T:W").EntireColumn.Hidden = False
       
        Case 5
        Columns("X:AA").EntireColumn.Hidden = False
       
        Case 6
        Columns("AB:AE").EntireColumn.Hidden = False
       
        Case 7
        Columns("AF:AI").EntireColumn.Hidden = False
       
        Case 8
        Columns("AJ:AM").EntireColumn.Hidden = False
       
        Case 9
        Columns("AN:AQ").EntireColumn.Hidden = False
       
        Case 10
        Columns("AR:AU").EntireColumn.Hidden = False
       
        Case 11
        Columns("AV:AY").EntireColumn.Hidden = False
       
        Case 12
        Columns("AZ:BC").EntireColumn.Hidden = False
       
        End Select