Basically only want the specific columns specified here to be hidden. For example, AH and AJ should not be hidden when the toggle button is pushed.

Private Sub ToggleButton1_Click()
Dim xAddress As String
xAddress = ("AI:AI,AK:AK,AM:AM,AO:AO,AQ:AQ,AS:AS,AU:AU,AW:AW,AY:AY,BA:AB,BC:BC,BE:BE")
If ToggleButton1.Value Then
Application.ActiveSheet.Columns(xAddress).Hidden = True
Else
Application.ActiveSheet.Columns(xAddress).Hidden = False
End If

End Sub