Formula or Macro to hide/unhide column

[mistrmoto]

I have a list on Sheet1 Column B with checkboxes in Column A with corresponding TRUE/FALSE in column C. I am wanting to show the list that is checked as columns in Sheet2, without spaces so that I can have a printable sheet for each type of list needed.

So far I have manually put in a formula for each column in Sheet2 to show the word for each row in Sheet1 that has a checked box, otherwise it will be blank. I would like for the columns in Sheet2 to be hidden when the box is unchecked in Sheet1, and to show when it is checked. I don't know of a formula to do this, and if a macro should be done I don't know how to do so.

Thanks for your help
Moto

 

[texasalynn]

here is an example of hiding rows

Sub CheckBox_NotChecked()
    With Sheets("B")
        If CheckBox1 = True Then
            .Rows("1").Hidden = True
        Else
            .Rows("1").Hidden = False
        End If
 End With
End Sub