Рет қаралды 71,471
Descarga el archivo de ejemplo | www.exceleinfo.com/actualizacin-2-formulario-de-punto-de-venta-en-excel-vba-probado-con-lector-de-cdigo-de-barras
Suscríbete a este canal | goo.gl/M5zNA8
Esta es la segunda revisión que le hago al Formulario de Punto de venta en Excel, la primera actualización le añadíamos la posibilidad de eliminar transacciones en caso de habernos equivocado en la cantidad.
Después de publicar el video donde explicamos cómo funciona el Punto de venta, recibí algunos comentarios donde me decían que se generaba un error en las líneas:
Me.lblProductos = .Text(CInt(Me.lblProductos) + CInt(intCantidad), "#,##0")
Me.lblTotal = .Text(CDbl(Me.lblTotal) + CDbl(intTotal), "$#,##0.00;-$#,##0.00")
En las dos líneas anteriores tenemos dos situaciones:
Con la función Cint convertimos el valor de la etiqueta lblProductos y la variable intCantidad entero. Pero en lugar de convertir el valor a Integer, debe ser convertido a Long.
Usamos la función WorksheetFunction.Text para darle formato a la suma del valor de la etiqueta lblTotal y la variable intTotal pero el formato utilizado es válido para la configuración Español (México).
Muchos ejemplos | www.exceleinfo.com
Muchos ejemplos | blogs.itpro.es/exceleinfo
Página de Facebook | EXCELeINFO
Recibe notificaciones por Telegram | t.me/EXCELeINFO
Twitter | @EXCELeINFO
Twitter | @SergioACamposH
Descargar EXCELeINFO addin:
addin.exceleinfo.com