Can anybody give me a macro for the following:

I have a list of item on row 2, with their corresponding category on
row 1 as per below:

Categ A CategB Categ A Gateg C Categ A Categ B
Item1 Item2 Item3 Item4 Item5 Item6

I would like to hide all column if categories in row 1 are not of
Category A

Thxs beforehand