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

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.

Se modifican los tipos de variables para aceptar cantidades mayores.

Figura 1. Se modifican los tipos de variables para aceptar cantidades mayores.

Descargar el archivo de ejemplo

Descargar el ejemplo Formulario de punto de venta 3 – EXCELeINFO.zip

You may also like...

RECIBE CONTENIDO EXCLUSIVO

Tips, trucos, videos para convertirte en un EXPERTO EN EXCEL y llegar al éxito. Suscríbete y recibe el mejor contenido en tu correo.