Trying to filter sheet so it only shows the column codes against the Product Codes

Trying to AUTOMATE sheet so it only shows the column codes against the Product Codes with values in and removes the blanks so I don't have to scroll across the screens to see which codes have a 1 in.

I've attached an example for what I'm looking.

Thank you in advance for your help

Ade

RAW DATA BELOW Column Codes
Product Code Grand Total AA1 BB2 CC3 DD4 EE5 FF6 GG7 HH8 JJ9 KK10 LL11
11111 3 1 1 1
22222 2 1 1
33333 4 1 1 1 1


What I would like it to look like below
Product Code Grand Total Column Codes
11111 3 BB2 HH8 LL11
22222 2 DD4 GG7
33333 4 CC3 EE5 HH8 KK10