Unhide Columns VBA

[happyhungarian]

Hi, I use the following code to unhide rows incrementally. How can I change it to unhide Columns in the same manner? Example, my hidden columns would be columns C through H

Sub Unhide_Rows()

Dim i as Long

With ActiveSheet
For i = 21 to 35
If .Rows(i).EntireRow.Hidden Then
.Rows(i).EntireRow.Hidden = False
Exit For
End If
Next i
End With

End Sub

 

[DanteAmor]

You're welcome.