Imprimir y guardar informacion

[OSKARFER]

SOLICITO AYUDA, NECESITO IMPRIMIR Y GUARDAR LA INFORMACION EN UNA NUEVA HOJA.

TENGO ESTE CODIGO:

Sub ImprimirReporte()

Sheet63.PrintOut 1, 2

End Sub

QUE MAS DEBO AGREGAR.

ADICIONALMENTE DEBO INSERTAR UNA HOJA QUE ME DE POR MEDIO DE UNA CONTRASEÑA LA ENTRADA A LAS OTRAS HOJAS, COMO LO HAGO????????.

GRACIAS.

[JoaoM]

OSKARFER

QUE MAS DEBO AGREGAR.

un archivo para ejemplo

Le las normas

https://www.ayudaexcel.com/foro/normas-reglas-del-foro-65/reglas-del-foro-12516/

[OSKARFER]

agrego archivo:

gracias

- - - - - Mensaje combinado - - - - -

envio el archivo que estoy trabajando

doc equivalente.zip