Quitar rejilla en un area de trabajo

Worksheets.Select
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayOutline = False
End With

Con esto seleccionas todas las hojas de cálculo que tenga el libro en el momento de ejecutar el código y ocultas las líneas de división, los encabezados y los símbolos de esquema.

Ten en cuenta que normalmente el grabador de macros genera un código muy ineficiente...
Un saludo.


Fernando Arroyo
MS MVP - Excel


"julian-vlc-sp" <ijulianARROBAiespana.es> escribió en el mensaje news:

Perdona, Fernando, pero estoy empezando con esto del código y soy muy
novato.

Grabando un macro, tengo el siguiente código:

Sub zinicio()
'
' inicio Macro
' Macro grabada el 22/11/2003 por Julián
'

'
Sheets(Array("VARIOS PRODUCTOS (1)", "VARIOS PRODUCTOS (2)")).Select
Sheets("VARIOS PRODUCTOS (1)").Activate
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayOutline = False
End With
End Sub

esto me hace lo que quiero, lo que pasa es que el usuario puede añadir hojas
en el libro, y a las hojas añadidas también quisiera aplicarles este codigo.

Creo que necesito algo que me seleccione todas las hojas del libro, para
sustituir la línea

Sheets(Array("VARIOS PRODUCTOS (1)", "VARIOS PRODUCTOS (2)")).Select

por algo que me las seleccione todas

SALUDOS.
julian-valencia-españa

lo pruebo ahora mismo y te digo algo.

como el tema cambiaba un poco, he puesto otro hilo que se titula seleccionar
hojas por código, es lo mismo, no te molestes.

GRACIAS y SALUDOS.

SALUDOS.
julian-valencia-españa