Quitar encabezados al abrir el archivo y de igual modo para las demás hojas

Tengo un proyecto que en la hoja 1 son los menús, y en hoja 2 son unas capturas y de igual la hoja 3, quiero que al abrir el archivo se esconda los encabezados tanto de filas como de columnas osea (A, B. C ...) Y 1, 2, 3, ... De las hojas para dar una buena presentación. No se si se puede con programación de vb

Respuesta

Pon esta macro en Thisworkbook asociado al evento Open

Sub esconde()
Dim ws As Worksheet
i = 1
For Each ws In Worksheets
Sheets(i).Select
Columns("A:C").EntireColumn.Hidden = True
Rows("1:3").EntireRow.Hidden = True
i = i + 1
Next
End Sub

Cada vez que se abra el libro ocultará las columnas A B C y filas 1 2 3 de todas las hojas del libro

Si necesitas que solo sean las hojas1 2 y 3 o las tres primeras hojas o algo se puede modificar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas