Generar EAN13 es un formato de código de barras lineal apilado utilizado en una amplia variedad de aplicaciones, principalmente, de transporte, identificación y gestión de inventario
¿La pregunta que nos hacemos todos es como generar el Código EAN13 en Excel?
Bien una manera que muchos comparten es generar el el Código EAN13 usando el servicio de Google API lo cual solo requiere una llamada por un módulo de Excel y listo. Aquí la desventaja seria depender de una conexión a internet SIEMPRE.
Ahora generar EAN13 en Excel lo veo demasiado difícil si solo nos enfocamos en los controles y herramientas que nos brinda VBA Excel.
Sin embargo, aquí si tenemos que ir a usar herramientas externas como son librerías.
Uso de la librería zxing.dll de .NET que fue la mejor, sin embargo esta librería no está disponible para Excel. Aquí se desarrollo una dll (NET) que sea compatible con VBA Excel.
1 2 3 4 5 6 7 8 9 10 11 |
Function QR(txtQR As String) Dim Im As DsigQR Set Im = New DsigQR With Im .TextoQR = txtQR .NombreImg = "EAN13.jpg" .RutaArchivo = ThisWorkbook.path .GenerarEAN13 End With Set Im = Nothing End Function |
¿Cómo ver el reporte en documento del Código de Barras?
Para listar en un reporte que no sea Excel es necesario usar un reporteador para lo cual comparto el link de descarga.
Acerca del autor