Exportar listbox a otro excel y a pdf
Hola, Buen día,
Favor su apoyo.
En un Formulario tengo un Listbox el cual me filtra datos de otro libro excel, hasta ahí todo bien. Ahora lo que quiero hacer es que mediante un botón pueda exportar esos datos que me muestra el ListBox hacia un nuevo Libro Excel y otro botón que me permita exportar los datos del Listbox hacia un Pdf.
Nota: Al momento de presionar el Botón para exportar tiene que aparecer la ventana de Guardar Como para poder especificar ruta y nombre del Archivo.
De antemano muchas gracias por el apoyo.
1 Respuesta
Te anexo el código para el primer botón.
Private Sub CommandButton1_Click() 'Por.Dante Amor Set l1 = Workbooks.Add Set h1 = l1.ActiveSheet c = ListBox1.ColumnCount f = ListBox1.ListCount h1.Range(h1.Cells(1, 1), h1.Cells(f, c)) = ListBox1.List MsgBox "Nuevo libro creado", vbInformation, "EXPORTAR LISTBOX A EXCEL" End Sub
Podrías crear una pregunta para cada petición, en este caso podrías crear una nueva pregunta para exportar el listbox a un pdf.
Saludos. Dante Amor
No olvides valorar la respuesta.
Estimado Dante;
Primero agradecerte por tu pronta respuesta.
Es justamente lo que busco para el primer botón, solo un detalle más: Luego que me arroje el mensaje "Nuevo Libro Creado", me muestre el libro creado y que automáticamente lo guarde en la unidad D.
Gracias una vez más.
Te anexo la macro con lo último que solicitaste.
Private Sub CommandButton1_Click() 'Por.Dante Amor Set l1 = Workbooks.Add Set h1 = l1.ActiveSheet c = ListBox1.ColumnCount f = ListBox1.ListCount h1.Range(h1.Cells(1, 1), h1.Cells(f, c)) = ListBox1.List l1.SaveAs "C:\nuevo" MsgBox "Nuevo Libro Creado" Unload Me End Sub
Al final de mi respuesta dice: “Es una buena respuesta” y puedes seleccionar una de 3 opciones:
- Excelente
- Si
- No
Saludos. Dante Amor
Recuerda valorar para continuar con las siguientes peticiones
Cambia en la macro "C:\nuevo", por "D:\nuevo"
Cambia nuevo por el nombre que quieras.
¡Gracias! Me sirvió muchísimo...
Ya tengo todo lo del primer botón ok.
Hola buen día,
Disculpa la molestia nuevamente
Cómo hace para que al momento de presionar el Botón para exportar aparezca la ventana de Guardar Como para poder especificar ruta y nombre del Archivo.
De antemano muchas gracias por el apoyo.
Recuerda crear una pregunta para cada petición
