Making a Hide/Unhide Toggle button

[Souljah]

Can someone tell me how to do one of these?

I want it to just hide a particular column when toggled down and unhid
when toggled up, and also, automatically hide the respective column o
startup of the workbook.
thanks for any hel

 

[JE McGimpsey]

Toggle:

Public Sub ToggleHiddenColumn()
With Columns(1)
.Hidden = Not .Hidden
End With
End Sub

hide at start:

Private Sub Workbook_Open()
Worksheets("Sheet1").Columns(1).Hidden = True
End Sub