Macro para no imprimir página

06/11/2008 - 02:35 por Ricardo Robles | Informe spam
Hola buen día.

El asunto es que necesito realizar una macro en la cual me oculte unas
filas, al apretar un botón, pero necesito que a la hora de imprimir un
documento las filas que se ocultan estan en una hoja, quiero que esa hoja no
se imprima por que solo aparece un espacio en blanco, donde debería estar las
filas ocultas, solo imprime el encabezado.

Quisiera que la macros, suprima esa hoja en especifica, a la hora de
imprimir, pero que a su vez como el docuemnto muestra el número de página se
corra al suprimir esa hoja.

Espero me puedan ayudar.

Saludos!

Preguntas similare

Leer las respuestas

#6 Ricardo Robles
07/11/2008 - 16:22 | Informe spam
Hola, gracias por sus respuestas.

Si efectivamente, borrar dicha página puede ser una solución, solo que
aveces se requieren de las filas que se ocultan, es decir, se ocultan o no se
ocultan dependiendo del caso, y borrando esa hoja que no se quiere imprimir,
ya no se podra tener acceso despues.

Aun sigo atorado en ese punto.

Saludos!!
Respuesta Responder a este mensaje
#7 Héctor Miguel
07/11/2008 - 19:09 | Informe spam
hola, Ricardo !

Si efectivamente, borrar dicha pagina puede ser una solucion
solo que aveces se requieren de las filas que se ocultan, es decir, se ocultan o no se ocultan dependiendo del caso
y borrando esa hoja que no se quiere imprimir, ya no se podra tener acceso despues.
Aun sigo atorado en ese punto.



(si no interpreto mal) la propuesta de Odette NO es que borres "la pagina", sino solamente "el salto en esa pagina"

por que no comentas cuales son las filas que utilizas como titulo superior ?
y cual es el rango de impreson completo (excluyendo las filas de titulo) ?
y cuales son las filas de la pagina que necesitas mostrar/ocultar segun sea el caso ?
y la macro con la que ocultas/muestras esas filas ?
(y de pasadita, confirma si incrustas saltos de pagina manuales, y donde) -?-

saludos,
hector.
Respuesta Responder a este mensaje
#8 Ricardo Robles
07/11/2008 - 20:46 | Informe spam
Hola, de antemano les agradesco sus comentarios y sugerencias.

Hector, mencionas en la opción 2 que se pueden establecer rangos
discontinuos si se modifica el área de impresión, pero no tengo idea de como
es que se pueden realziar esos rangos discontinuos, te agradecere si me
puedes orientar.

Con respecto a tus preguntas:

por que no comentas cuales son las filas que utilizas como titulo superior ?


R= El documento tiene en diseño de página en la pestaña "hoja", repetir fila
en el extremo superior de la fila $81:$92. Esto lo que se repite en todas las
páginas del documento.

y cual es el rango de impreson completo (excluyendo las filas de titulo) ?


R=En diseño de página muestra que el área de impresión es A1:P981

y cuales son las filas de la pagina que necesitas mostrar/ocultar segun sea el caso ?


R= Son las filas de la 492 a la 547, que forman una página.

y la macro con la que ocultas/muestras esas filas ?


Por el momento no se tiene una macro, por que no la hemos podido concretar.
Pero lo que se hace, es que con un botón en otra hoja del mismo libro, se
empieza a grabar la macro, pasando a la hoja de donde se quiere ocultar las
filas, haciendo click con el botón derecho, ocultar las filas, regresamos a
la hoja de inicio y se detiene la grabadora de macros.

(y de pasadita, confirma si incrustas saltos de pagina manuales, y donde) -?-


R= No tiene saltos de páginas manuales, se trabaja el documento en vista
previa de saltos de páginas, y aparece una linea azul, donde son las
divisiones de las páginas.


Espero me puedan ayudar.
Saludos!!
Respuesta Responder a este mensaje
#9 Héctor Miguel
07/11/2008 - 21:18 | Informe spam
hola, Ricardo !

con los detalles que aportas en esta consulta...
suponiendo que "la hoja" se llama "hoja 500" (ajusta/modiica/adapta/corrije/... al nombre real)
prueba con las siguientes dos macros (y luego pruebas la vista previa y/o la impresion ?)

Sub OcultaFilas()
With Worksheets("hoja 500")
.Range("a492:a547").EntireRow.Hidden = True
.PageSetup.PrintArea = "$a$1:$p$491,$a$548:$p$981"
End With
End Sub

Sub MuestraFilas()
With Worksheets("hoja 500")
.Range("a492:a547").EntireRow.Hidden = False
.PageSetup.PrintArea = "$a$1:$p$981"
End With
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
... mencionas... que se pueden establecer rangos discontinuos si se modifica el area de impresion
... no tengo idea de como es que se pueden realziar esos rangos discontinuos ...
... repetir fila en el extremo superior de la fila $81:$92...
... el area de impresion es A1:P981
y cuales son las filas de la pagina que necesitas mostrar/ocultar segun sea el caso ?


R= Son las filas de la 492 a la 547, que forman una pagina.
y la macro con la que ocultas/muestras esas filas ?


Por el momento no se tiene una macro, por que no la hemos podido concretar...
No tiene saltos de paginas manuales ...
Respuesta Responder a este mensaje
#10 Ricardo Robles
08/11/2008 - 19:11 | Informe spam
Hola Hector gracias por tu sugerencia.

En un momento más pruebo con las macros que me has indicado, y les comento
si me han servido.

Saludos!

"Héctor Miguel" escribió:

hola, Ricardo !

con los detalles que aportas en esta consulta...
suponiendo que "la hoja" se llama "hoja 500" (ajusta/modiica/adapta/corrije/... al nombre real)
prueba con las siguientes dos macros (y luego pruebas la vista previa y/o la impresion ?)

Sub OcultaFilas()
With Worksheets("hoja 500")
.Range("a492:a547").EntireRow.Hidden = True
.PageSetup.PrintArea = "$a$1:$p$491,$a$548:$p$981"
End With
End Sub

Sub MuestraFilas()
With Worksheets("hoja 500")
.Range("a492:a547").EntireRow.Hidden = False
.PageSetup.PrintArea = "$a$1:$p$981"
End With
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
> ... mencionas... que se pueden establecer rangos discontinuos si se modifica el area de impresion
> ... no tengo idea de como es que se pueden realziar esos rangos discontinuos ...
> ... repetir fila en el extremo superior de la fila $81:$92...
> ... el area de impresion es A1:P981
>> y cuales son las filas de la pagina que necesitas mostrar/ocultar segun sea el caso ?
> R= Son las filas de la 492 a la 547, que forman una pagina.
>> y la macro con la que ocultas/muestras esas filas ?
> Por el momento no se tiene una macro, por que no la hemos podido concretar...
> No tiene saltos de paginas manuales ...



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida