Actualización 2: Formulario de punto de venta en Excel vba probado con lector de código de barras
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).
Ver video V.2 – Punto de Venta en Excel vba probado con lector de código de barras
Suscríbete al canal de EXCELeINFO en YouTube para aprender más de Excel y macros.
Variables Integer VS variables Long
El rango de las variables Integer es –32,768 a 32,767 y el rango de las variables Long es –2,147,483,648 a 2,147,486,647. Por lo anterior, preferimos usar tipo Long para prevenir cuanto tengamos cantidades mayores a 30 mil.
WorksheetFunction.Text VS Format
Al usar la función Text podemos usar una formato personalizado que obtenemos desde el formulario Formato de celdas en la sección Personalizada, pero dichos formatos se apegan a la configuración regional que se tenga definida en el Panel de control. En cambio, al usar la función Format, podemos usar el formato Currency para moneda o Standard para tener números con separación de miles.
Figura 1. Se modifican los tipos de variables para aceptar cantidades mayores.
