Visualizar Datos En Listbox De Una Hoja E Imprimir d402x

4/11/2017

Visualizar datos en listbox de una hoja e imprimir

Comparte :

Foroactivo

Bienvenido/a jmartinez

Notificaciones

UniversoExcelForo Instructivos En Funcionamiento del foro están los tutoriales para efectuar preguntas y adjuntar archivos, subir imágenes, videos, ícono Resuelto. Mensaje [Página 1 de 2.] Visualizar datos en listbox de una hoja e imprimir el 15/01/14, 03:57 pm

Reglamento del foro

JesuMarPla Hola: Estoy trabajando con un sistema para caja gracias a sus valisosas ayudas en el foro, y bueno vi en su foro un ejemplo de visualizar datos en un listbox , lo baje y quise modificarlo para que yo puede usarlo segun mi necesidad, pero mis conocimientos son muy bajos con respecto a la programación, quisiera que por favor me ayuden con los codigos correspondientes, adjunto el archivo de mi consulta la clave es "JMP" para poder ingresar la fecha y pueda visualizar en el listobx los datos que quisiera se visualizen y despues imprimirlos, y un detalle mas en la parte de abajo de mi formulario tengo un resumen de ventas, Gracias por su atención, cordiales saludos

Recomendaciones para hacer preguntas

Suban archivos en zip Descripción gráfica para subir archivo.

Temas abandonados Para quienes contestan preguntas

Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 16/01/14, 06:27 am

Avisos

1

2

SAKKAR JesuMarPla, como estás?

Curso de VBA por José Carlos Últimos temas

Por favor intenta subir nuevamente el archivo porque no subió!! » Concatenar columnas que dependen de otra por Chego_ Hoy a las 04:56 am

Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 16/01/14, 09:54 am

3

JesuMarPla Que raro pensé que subí el archivo, ahora ya esta adjunto gracias saludos Jesús

» Sumar Dos columnas y el Remplazar el Resultado en una por SAKKAR Ayer a las 10:40 am

ARCHIVOS AyudaCaja.xlsm

» Actualización automática de tabla dinamica por wibly Ayer a las 07:26 am

CONTRASEÑA JMP (115 KB)

Re: Visualizar datos en listbox de una hoja e imprimir el 16/01/14, 11:49 am

4

SAKKAR

» No repetir nombres en varias hojas por gomezvila 29/10/17, 12:38 pm

Expliques de forma DETALLADA que es lo que necesitas... detalladamente por favor Saludos 5

JesuMarPla Gracias por responder e interes Bueno hay un formulario llamado BOLEMIT quiero llamar desde mi formulario que esta con el nombre MENU y al apretar el boton REPORTE DIARIO DE BOLETOS llame al formulario BOLEMIT poder mediante el combo que dice fecha ingresar la fecha y al darle click en el boton buscar visualize en el listbox los datos que estan en el encambezado del listbox y en la parte de abajo que refleje los totales , y despues imprimir este detalle. Gracias y saludos Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 17/01/14, 08:41 am

» Consulta de datos desde textbox, combobox a un listbox por refjack 31/10/17, 10:49 pm » GUARDAR EN PDF DATOS DE UNA LISTA por ofol 31/10/17, 07:00 am

OK muy bien ya con el archivo en mano... te pido lo siguiente...

Re: Visualizar datos en listbox de una hoja e imprimir el 16/01/14, 01:50 pm

» FICHERO PARA PEÑA QUINIELA por lulocorba Ayer a las 11:18 am

6

SAKKAR

» Curso de VBA Por José Carlos Gomez Vila por gomezvila 29/10/17, 11:24 am » Porque no me carga el listbox por Visor 29/10/17, 09:25 am » necesito ponerle adaptarle este listbox Formulario B a este formulario A lo subo si pueden ayudarme mil gracias por persivalx 28/10/17, 04:23 pm » Macros para crear cliente. por Ing.Carlos_Campos 27/10/17, 11:14 pm » macro imprimir en pdf hoja segun nombre y condicion por jhon1904 27/10/17, 11:13 pm

Bueno.... he estado revisando tu archivo.... RECOMIENDO ENFATICAMENTE que realices esto en ACCESS y no en EXCEL, ya que por lo que veo, luego necesitarás reportes, etc, etc...

» Como unir estos dos códigos en uno solo por jhon1904 27/10/17, 10:57 pm

Si lo querés seguir armando en Excel, hay que HACER TODO DESDE EL COMIENZO ya

» AYUDA PARA FINALIZAR ESTA MACRO

http://www.universoexcelforo.com/t529-visualizar-datos-en-listbox-de-una-hoja-e-imprimir

1/5

4/11/2017

Foroactivo

Visualizar datos en listbox de una hoja e imprimir PLEASE

que está mal armado y las referencias mal nombradas... en fin, es menos trabajo Comparte : armar todo desde cero que ir chequeando y probando que esta mal...

Bienvenido/a jmartinez Notificaciones por jhon1904 27/10/17, 10:56 pm

Obviamente este es un trabajo que requiere de mucho tiempo.

» Tabla dependiente de Hojas en un Mismo Libro. por jhon1904 27/10/17, 09:59 pm

Te pido me respondas con que programa querrias hacerlo y de decidir Excel, tendrás que dejarmelo reslover para fin de la semana próxima.. Quedo atento

Palabras claves

Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 17/01/14, 09:10 am

7

JesuMarPla Gracias por las sugerencias pero si esta decidido quiero hacerlo en excel, mira te paso el archivo original de la persona que ya lo realizo, solo que no funciona en mi maquina, hice las modificaciones necesarias pero se que esta mal, con este archivo si se puede, y por favor quisiera que me ayudes a encontrar el error que yo estoy cometiendo para que si funcione con mi archivo. Gracias Jesús

Formulario quitar

entre

fechas

dinamica encontrar

otra

para

hojas celdas

Tabla

VENTAS

datos macro capturar

condicion

CONTROL desplegables filtros copiar filtrar Códigos excel mover

buscar hoja

Darse de baja Re: Visualizar datos en listbox de una hoja e imprimir el 17/01/14, 09:11 am

8

JesuMarPla

Eliminar cuenta

Este es el archivo original ARCHIVOS Copia de ListBox y Cómo Imprimir.xls (86 KB)

Re: Visualizar datos en listbox de una hoja e imprimir el 17/01/14, 06:03 pm

9

tyno Hola Jesús, hola Sakkar. Yo he revisado un poco el formulario BOLEMIT, no he probado si da los resultados correctos pero is he encontrado dos cosas. Una es que en el código de ese formulario se hace referencia a un ComboBox1, el cual no existe, en su lugar esta el ComboBox2, por lo que da error el código que contiene este formulario, la solución es simple, solo hay que cambiar donde dice ComboBox1 por ComboBox2 en todos los casos. En segundo lugar en las propiedades del ListBox1, en la propiedad ColumCount se ha puesto el valor uno, con esto indicamos las cantidades de columnas que queremos ver en dicho ListBox1, como en la propiedad ColumnWidths hay seis valores: 80 pt;60 pt;60 pt;135 pt;80 pt;80 pt, deduzco que lo que se pretendía era ver 6 columnas por lo tanto hay que cambiar el valor 1 de ColumnCount a 6. De momento tendrías que probar con esto Jesús a ver si cambia algo. Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 18/01/14, 09:05 am

10

JesuMarPla Estimado Tyno: Gracias por las sugerencias cambie todo lo que me dijiste pero nada no carga el combobox con los datos de la hoja gracias de todas maneras Saludos Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 18/01/14, 09:26 am

11

tyno Ok, luego estoy revisando el archivo con mas detalle. Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 18/01/14, 09:34 am

12

JesuMarPla Gracias Saludos Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 18/01/14, 07:46 pm

13

tyno Hola Jesús. Prueba el archivo ahora. He modificado el método para cargar los datos en el ComboBox2 y así mismo para cargar datos en el ListBox1. Cualquier cosa por aquí estaremos. Saludos ARCHIVOS AyudaCaja.zip (109 KB)

Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 06:29 am

14

JesuMarPla Gracias esta alucinante las modificaciones, solo unas consultitas más, 1.- Que modifico para que cargue la fecha? porque modifique a la columna F, pero no carga en el listbox. 2.- Carga los montos como texto como seria para que cargue en formato de contabilidad? 3.- No suma los totales.

http://www.universoexcelforo.com/t529-visualizar-datos-en-listbox-de-una-hoja-e-imprimir

2/5

4/11/2017

Foroactivo

Visualizar datos en listbox de una hoja e imprimir 4.- Para que imprima cual seria el codigo.

Comparte :

Bienvenido/a jmartinez

Notificaciones

Desde ya muchas gracias infinitas por tú tiempo y colaboración, enserio que es muy valioso para mi tú ayuda y de seguro muchos internautas bajaran el archivo. Saludos Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 07:42 am

15

tyno Ok. esas cosas la verdad que no las tuve en cuenta ya que me limite al proceso para que el listbox traiga los datos. Ahora necesito un par de aclaraciones: 1.- Que modifico para que cargue la fecha? porque modifique a la columna F, pero no carga en el listbox. ¿que modificacion has hecho que no te aparece esta fecha?¿has insertado columnas? 2.- Carga los montos como texto como seria para que cargue en formato de contabilidad? cual es el formato que estas utilizando puntualmente; no estoy seguro si en el listbox va a aparecer, en todo caso se puede aclarar en el rotulo de la columna como esta expresado el valor. 3.- No suma los totales. ¿y en que parte hay que sumarlos? Supongo que estamos hablando de los montos de dinero 4.- Para que imprima cual seria el código. ¿que es lo que hay que imprimir de ese formulario¿los datos traídos en el listbox? Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 08:21 am

16

JesuMarPla Bueno cuando estoy en el combobox2 (fecha) me despliega el COD-CLTE que esta en la columna D de la hoja BOLETOS , lo que quiero es que filtre por la fecha que esta en la columna F. 2.- En la parte del contenido del listbox carga los datos que si quiero que se visualicen pero donde dice BOLIVIANOS Y DOLARES como títulos del listbox quisiera que se cargue como por ejemplo 1,000.00 en formato contabilidad. 3.- En el formulario están dos textbox que dicen TOTAL VENTAS y como títulos dice BOLIVIANOS DOLARES en ese total quisiera que se sume el total de los montos de la fecha elegida, o sea lo que se visualice en el listbox los montos de cada boleto sea un total del día tanto en BOLIVIANOS Y DOLARES 4.- Quisiera que se imprima lo que se visualiza del listbox incluyendo la fecha que esta en el combobox así como un resumen del día de ventas. Muchas gracias por tú tiempo y paciencia. Saludos cordiales Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 12:42 pm

17

tyno Ok. mas tarde reviso tu archivo porque ahora no tengo Excel 2010. Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 01:19 pm

18

JesuMarPla Ok gracias SAludos Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 20/01/14, 07:21 pm

19

tyno Hola Jesus. Te paso el archivo con las modificaciones de la fecha y la opción de imprimir, que por cierto vas a tener que configurar la Hoja para imprimir horizontalmente de los contrario no te van a entrar en una sola Hoja las columnas que se ven en el ListBox mas la fecha. Prueba y me avisas lo que sea necesario modificar. Saludos ARCHIVOS AyudaCaja.zip (116 KB)

Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 06:22 am

20

JesuMarPla Esta excelente la ayuda, un millón de gracias enserio eres un CAPO total, solo dos molestias más y ya no te pregunta nada más. 1.- Como imprimir la hoja horizontalmente? (Porque imprime la hoja verticalmente) ya modifique desde la impresora como horizontal y nada sigue imprimiendo verticalmente.

http://www.universoexcelforo.com/t529-visualizar-datos-en-listbox-de-una-hoja-e-imprimir

3/5

4/11/2017

Foroactivo

Visualizar datos en listbox de una hoja e imprimir 2.- En los montos de Dólares no esta con formato de contabilidad.

Comparte :

Bienvenido/a jmartinez

Notificaciones

Disculpa las molestias y el tiempo que te quito con mis preguntas, estoy muy agradecido por la ayuda y sobre todo saber que si se puede hacer maravillas con el excel. Un abrazo Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 06:24 am

21

JesuMarPla Y una ultima cosita más, no quisiera que por favor se impriman los bordes solo de los títulos. (tú sabes tenemos que economizar la tinta jejejeejee) Gracias Atte, Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 06:57 am

22

JesuMarPla Me diras fregado, pero si uno no pregunta no aprende, porque tengo una ahora si ultima ayuda, no quisiera que este centreados los datos que estén alineados a la derecha estaría mucho mejor, agradecido con todas tus ayudas y sobre todo paciencia. Un abrazo Jesús PD. Después el archivo esta alucinante tal como pensaba que saldría . Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 07:03 am

23

tyno Hola Jesus. Estaba en duda si te iba a imprimir o no de forma horizontal los datos del ListBox. En realidad lo que hace la macro es crear una Hoja auxiliar llamada Hoja_imprimir, le inserta los datos del ListBox, los imprime y luego se elimina la Hoja. Pero vas a tener que volver a esperar hasta mas tarde porque ahora de mañana no tengo el Excel 2010 como para hacer las modificaciones y pruebas. Pero si te animas a modificar un par de lineas mientras tanto para probar o usar el archivo. En el código que esta asignado al botón (CommandButton3) IMPRIMIR del formulario BOLEMIT, tienes que convertir a texto las lineas que te señalo abajo: Private Sub CommandButton3_Click() On Error Resume Next Application.ScreenUpdating = False a = MsgBox("Se imprimiran los datos!", vbOKCancel, "Imprimir..." ) If a = vbCancel Then Exit Sub

Application.DisplayAlerts = False Sheets("Hoja_imprimir").Delete Application.DisplayAlerts = True

Sheets.Add.Name = "Hoja_imprimir" With Sheets("Hoja_imprimir") .Range("a1") = "FECHA" For a = 0 To 9 .Cells(1, a + 2) = Me.Controls("Label" & a + 8 ) Next a

For a = 0 To .Cells(a + 2, For b = 0 To .Cells(a + 2, Next b Next a

ListBox1.ListCount - 1 1) = ComboBox2 9 b + 2) = ListBox1.List(a, b)

rw_total = .Range("a1000000").End(xlUp).Row + 1 .Cells(rw_total, 9) = "Total: " .Cells(rw_total, 10) = TextBox1 .Cells(rw_total, 11) = TextBox6

.Columns.AutoFit Call formato_hoja_imprimir '<<
Application.DisplayAlerts = False '<<< convertir a texto agregar un apostrofe adelante ' Sheets("Hoja_imprimir").Delete '<<< convertir a texto agregar un apostrofe adelante ' Application.DisplayAlerts = True '<<< convertir a texto agregar un apostrofe adelante '

http://www.universoexcelforo.com/t529-visualizar-datos-en-listbox-de-una-hoja-e-imprimir

4/5

4/11/2017

Foroactivo

Visualizar datos en listbox de una hoja e imprimir

Comparte :

End With

Bienvenido/a jmartinez

Notificaciones

Application.ScreenUpdating = True

MsgBox "Impresion correcta", vbOKOnly End Sub Convirtiendo a texto la linea "Call formato_hoja_imprimir" se quitan los bordes, y convirtiendo a texto las otras lineas que he señalado no se va a imprimir de forma automática y no se elimina la Hoja Hoja_Imprimir, con lo cual al momento de imprimir vas a seleccionar dicha Hoja luego ir a imprimir y seleccionar posición horizontal y después de centrar los datos como quieras ahí si haces la impresión. Va a seguir apareciendo el mensaje de "Impresión correcta", pero es solo un mensaje asi que lo dejas si te parece o también lo convierte a texto, esto es la linea :"MsgBox "Impresion correcta", vbOKOnly" Tanto para el importe boliviano como para el dolar he usado el formato con separador de miles y punto para decimales (1,000.00) , si tienes un importe menor a mil la coma obviamente no aparece (999.99). Saludos Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 10:45 am

24

JesuMarPla Es una buena solución la que me indicas y funciona perfectamente, solo que eso es lo que quería evitar de que se quede la hoja y se pueda modificar, como son datos confidenciales, no queremos que s extras puedan modificar la información, es por eso que te indicaba que se imprima en forma horizontal directamente del formulario ; y el tema de la longitud de los datos se puede delimitar? por ejemplo en el titulo de forma de pago es muy largo para que solo se imprima dos caracteres. Yo se que tú puedes y así podría ser mas profesional la presentación. Te agradezco mucho por las enseñanzas que me estas impartiendo. Un abrazo Jesús Re: Visualizar datos en listbox de una hoja e imprimir el 21/01/14, 11:11 am

25

tyno Estaba pensando en una cosa, reenviame el archivo con la Hoja para imprmir con los rótulos (titulos de columnas) y medidas que te sirven para imprimir, lo que voy a hacer es en vez de que se elimine la Hoja_imprimir es que se borren los datos después de la impresion y esa Hoja queda ya establecida, en todo caso se puede ocultar. Saludos UniversoExcelForo

» Macros — Visual Basic (VBA)

» Visualizar datos en listbox de una hoja e imprimir

http://www.universoexcelforo.com/t529-visualizar-datos-en-listbox-de-una-hoja-e-imprimir

5/5