............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

imprimir hojas seleccionadas

Ver el tema anterior Ver el tema siguiente Ir abajo

imprimir hojas seleccionadas

Mensaje por jorge leon el Miér Ene 11, 2012 2:05 pm

Hola amigos de foro excel, tengo una aplicacion de excel 2010 con 5 hojas, de las cuales solo se imprimen 4hojas, la 5ta. hoja se imprime en lugar de la 2da., dependiendo de una opcion que se encuentra en un formulario en la misma aplicación de registro de datos, si se activa esta opción se imprimiran las hojas 1,5,3,4... si esta desactivada la opción se imprimiran las hojas 1,2,3,4....... mi pregunta es ¿como ó con que instrucciones logro estó?????? de antemano muchas gracias

jorge leon

Masculino Cantidad de envíos : 3
Edad : 66
Ciudad - Pais : México
Version de Excel : 2007,2010
Fecha de inscripción : 08/01/2012

Volver arriba Ir abajo

Re: imprimir hojas seleccionadas

Mensaje por avalencia el Vie Ene 13, 2012 1:06 am

¿de que formulario? No se entiende

Abraham

_________________
Microsoft MVP 2010

avalencia
MS MVP
MS MVP

Masculino Cantidad de envíos : 99
Edad : 39
Ciudad - Pais : Lima - Peru
Version de Excel : 2003 - 2007 - 2010
Fecha de inscripción : 28/06/2009

http://abrahamexcel.webcindario.com/

Volver arriba Ir abajo

Re: imprimir hojas seleccionadas

Mensaje por GalileoGali el Dom Ene 22, 2012 6:46 pm

algo asi

Código:
Sub ImpresionSelectiva()
    Sheets(Array("Hoja2", IIf(Userform1.Checkbox2 = True, "Hoja3", "Hoja1"))).Select  (o la expresion que corresponda para mantener el orden deseado)
    With ActiveSheet.PageSetup
        .Orientation = xlPortrait
        .Draft = False
        .PaperSize = xlPaperA4
    End With
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub


Última edición por GalileoGali el Lun Ene 23, 2012 6:30 am, editado 1 vez

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: imprimir hojas seleccionadas

Mensaje por jorge leon el Dom Ene 22, 2012 11:05 pm

muchas gracias amigo Galileo......

jorge leon

Masculino Cantidad de envíos : 3
Edad : 66
Ciudad - Pais : México
Version de Excel : 2007,2010
Fecha de inscripción : 08/01/2012

Volver arriba Ir abajo

Re: imprimir hojas seleccionadas

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.