Try

Option Explicit

Sub toggleColumns()
    With ActiveSheet.Range("C:C,I:I,S:S,X:X")
        .EntireColumn.Hidden = Not .EntireColumn.Hidden
    End With
End Sub