ocultar columnas

hola, chicos !

puedes evitar el avance una a una y ocultar todo de un solo paso [p.e. desde la ventana de inmediato en el editor de vba]...

cells.entirecolumn.hidden=true

cells.entirerow.hidden=true

saludos,
hector.

Francisco Parrilla escribio en el mensaje ...
Al parecer todas :)

Sub oculto()
i = 1
Do
Columns(i).Select
Selection.EntireColumn.Hidden = True
i = i + 1
On Error GoTo salida
Loop
salida:
Exit Sub
End Sub