Guardar hojas especificas en PDF según ListBox
Tengo una Macro para exportar la hoja activa en PDF a una ruta especifica según el valor de la celda I1(Nombre del archivo PDF) e I2 (Ruta del PDF), mi PREGUNTA es: -¿Cómo puedo seleccionar ciertas hojas a exportar implementando un ListBox?.
Nota: tengo Office 2013.
2 Respuestas
Si quieres guardar varias hojas seleccionadas desde un listbox, consulta los siguientes enlaces:
Macros para exportar a pdf hojas seleccionadas de un libro de excel
Guardar determinadas hojas de Excel en PDF solicitando la Ruta y nombre
MACRO de excel para imprimir varias hojas de un mismo libro
En la solución, puedes tener hojas ocultas, poner hojas que siempre se impriman.
Ahí también viene explicado cómo crear el listbox y qué propiedades debe tener.
El nombre del archivo, puede tomar el dato de una hoja y una celda, pero deberás poner de cuál hoja, ya que vas a seleccionar varias hojas, o bien, puedes dejar un nombre fijo.
Avísame cualquier duda.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
H o l a
Te paso la macro.
Supongo que esto está en un módulo
Sub GuardarPDF() 'Act. Por Aortiz hoja = UserForm1.ListBox1.ListIndex + 1 nombre = Cells(1, 9) Ruta = Cells(2, 9) ' Sheets(hoja).ExportAsFixedFormat Type:=xlTypePDF, Filename:=Ruta & _ nombre, quality:=xlQualityStandard, _ includedocproperties:=True, ignorePrintAreas:=False, openAfterPublish:= _ True End Sub
Private Sub UserForm_Activate() For Each h In Sheets ListBox1.AddItem h.Name Next End Sub
en tu formulario pones esto para mostrar las hoja en el listbox
y con un botón haces la llamada para ejecutar la macro del módulo
Private Sub CommandButton1_Click() Call GuardarPDF End Sub
Valora la respuesta como Excelente o bueno para finalizar saludos!