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

1 Respuesta

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