Generar códigos de barras Code 128

1. Haga clic derecho en el símbolo del sistema y ejecútelo como administrador.

Para registrar la DLL de 64 bits, escriba los siguientes comandos:

cd "C:\Program Files\Common Files\Barcodesoft\FontUtil"
%systemroot%\System32\regsvr32.exe cruflbcs_x64.dll

Escriba los siguientes comandos para registrar la DLL cruflbcs.dll de 32 bits:

cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"
regsvr32.exe cruflbcs.dll

Si ve que aparece la siguiente ventana emergente, el registro se realizó correctamente.

2. Inicie Microsoft® Access®.

Si está utilizando Access 2000 o 2003, haga clic en el menú ===> Herramientas (Tools) ==> Macro ===> Seguridad (Security). Elija el nivel de seguridad Bajo (Low).

Si está utilizando Access 2010 / 2013 / 2016 / 2019 / 2021 / 2024, haga clic en el botón de Microsoft Office.

Luego haga clic en Opciones de Access (Access Options), elija Centro de confianza (Trust Center). En la categoría Configuración de macros (Macro Settings), dentro de Configuración de macros, elija "Habilitar todas las macros" (Enable all macros) como se muestra a continuación.

3. Presione ALT + F11 para abrir el editor de Microsoft® Visual Basic.

4. Desde el editor de Visual Basic, elija el menú Herramientas (Tools) ===> Referencias (References). Aparecerá un cuadro de diálogo. Haga clic en el botón Examinar (Browse) y elija cruflbcs.dll en su carpeta de trabajo. Por lo general, se encuentra en la carpeta C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil. Marque la casilla junto a crUFLBcs 4.0 Type Library como se muestra a continuación. Luego haga clic en el botón OK.

5. Presione Ctrl+M, aparecerá un cuadro de diálogo, elija barcodesoft.bas en la carpeta C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil. Luego haga clic en "Abrir" (Open).

Si no encuentra barcodesoft.bas, descárguelo desde code128.

6. Cierre Visual Basic y regrese a su base de datos de Access. Ahora, cree un informe en la vista Diseño (Design view) y escriba una de las siguientes macros en el campo donde desea mostrar el código de barras code128 antes de aplicar el tipo de letra, como Code128mHr:
=Code128A([data.code]) =Code128B([data.code]) =Code128C([data.code])

Tenga en cuenta que 'data' es el nombre de la tabla y 'code' es el nombre del campo.