Excel VBA Ocultar columnas

Columns(1).Hidden = True
' Into a range:
Dim myRange As Range
Set myRange = Application.Range("A1")
myRange.EntireColumn.Hidden = True
VasteMonde