Macro para Imprimir varias hojas de un mismo Libro, pero que no salgan todas las pestañas del documento
Para Dante Amor
Buenos días, estoy haciendo un proyecto en excel y necesito imprimir varias pestañas de un libro de excel, seleccionándolas de una lista. Y encontré un macro creado por "Dante Amor" que me sirve pero quisiera agregar algo adicional a este macro.
Aqui el link
MACRO de excel para imprimir varias hojas de un mismo libro
Yo necesito ese mismo macro pero que en la lista no salgan todas las pestañas del libro solo las que yo quiera que salgan para imprimir.
1 respuesta
Me explico mejor:
Mis pestañas se llaman: condominio 2016, deudas extras, deuda total, 10, 11, 12, 13, 20, 21, 22, 23... 93
Cuando yo le de a imprimir quisiera que en la lista me saliera solo los números osea que no me salga ni deuda de condominio, ni pagos extras ni la pestaña de deuda total
Si seguiste las instrucciones de la pregunta a la que haces referencia, entonces en el paso 8 pon el siguiente código:
Private Sub CommandButton1_Click() 'Por.Dante Amor For i = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(i) Then h = ListBox1.List(i) Sheets(h).PrintOut Copies:=1, Collate:=True End If Next End Sub Private Sub UserForm_Activate() 'Por.Dante Amor ListBox1.MultiSelect = 1 ListBox1.ListStyle = 1 For Each h In Sheets Select Case UCase(h.Name) Case "CONDOMINIO 2016", "DEUDAS EXTRAS", "DEUDA TOTAL" Case Else ListBox1.AddItem h.Name End Select Next End Sub
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
