Weekly tracking tables for follow-up

Question

I need your help!

I am building in excel a weekly follow-up that for example from the column D to column O there is a table with comments for the week 1 then column P there is nothing and from column Q to column AB there is a table with comments for the week 2...and so on until week 52. I want create a macro that just shows me the current week and then i can use two arrows "Back" & "Next" to navigate on the the other weeks. The table consist in 12 columns and 1 column between the next table I developed a very manual code but it will consume me time to do it until week 52.

Sub Week2BACK() {for the button "Back"} 

Columns("Q:XEE").EntireColumn.Hidden = True


Columns("D:O").EntireColumn.Hidden = False

End Sub

Sub Week2NExt() {for the button "Next"} 

Columns("D:AB").EntireColumn.Hidden = True

Columns("AP:XEE").EntireColumn.Hidden = True

Columns("AD:AO").EntireColumn.Hidden = False

End Sub

There is a way to make it faster? Because i want that is just shown one week at time on the worksheet.