• GS1-Databar barcode excel download
  • GS1-Databar barcode software order

Generate GS1-Databar Barcode in Microsoft® Excel®

It is a smart and simple solution to use Barcodesoft DLL and GS1-Databar font to generate GS1 Databar Barcode in Microsoft® Excel®.

With Barcodesoft GS1-Databar barcode font package and Microsoft® Office, it is very convenient to print GS1-Databar barcode from your desktop printer.

1. Copy all true type fonts (*.ttf) under fonts folder to your c:\Windows\Fonts folder.

2. Open DOS prompt. If you are using Windows 10 or Windows 7, please Open DOS prompt as administrator.
Please go to the following folder
CD C:\Program Files\Common Files\Barcodesoft\FontUtil
Type in the following DOS command to register crUFLbcs.dll
regsvr32 crUFLbcs.dll
GS1-Databar barcode excel DLL DOS registration

3. Start Microsoft® Excel® first.


If you are using Excel 2000 or 2003, click menu ===> Tools ==> Macro ===> Security. Choose Low security level.

GS1-Databar Macro Security

If you are using Excel 2007 / 2010 / 2013 / 2016 / 2019, click the Microsoft Office Button.
Office 2010 button Office 2016 button Office 2019 button
Then click Excel Options, choose Trust Center. In the Macro Settings category, under Macro Settings, choose "Enable all macros" as shown below.

GS1-Databar Macro Setting

4. Press ALT + F11 to open Microsoft® Visual Basic editor.
GS1-Databar VBA

5. From Visual Basic editor, choose menu Tools ===> References. It will popup a dialog. Click Browse button and choose cruflbcs.dll from your working folder.
Usually it's under C:\Program File\CommonFiles\Barcodesoft\Fontutil folder.
Click the checkbox beside crUFLBcs 1.0 Type Library as shown below. Then click OK button.

GS1-Databar barcode add reference

6. Press Ctrl+M, it will popup a dialog, choose barcodesoft.bas under C:\Program File\CommonFiles\Barcodesoft\Fontutil folder. Then click "Open".

If you don't find barcodesoft.bas, please download it from GS1-Databar barcode.
GS1-Databar barcode import vba

Or you can copy from the vba code snippet below

Public Function Databar14(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
Databar14 = obj.Databar14(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarStk(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarStk = obj.DatabarStack(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarStkOmni(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarStkOmni = obj.DatabarStkOmni(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarLtd(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarLtd = obj.DatabarLtd(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarExp(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarExp = obj.DatabarExp(strToEncode)
Set obj = Nothing
End Function

Public Function DatabarExpStk(strToEncode As String) As String
Dim obj As cruflBCS.CDatabar
Set obj = New cruflBCS.CDatabar
DatabarExpStk = obj.DatabarExpStk(strToEncode)
Set obj = Nothing
End Function

7. Close Visual Basic editor and go back to your spreadsheet. Now, you can use one of the following macros to encode data: databar14 . When you have lots of data to process, you can just copy and paste the macro to the whole column and all data will be encoded immediately.
=databar14(xx)
=databarStk(XX)
=databarStkOmni(XX)
=databarLtd(XX)
=databarExp(XX)
=databarExpStk(XX)

Please use cell reference to replace xxx in the formulas.

8. Right click Cell B1, choose Format Cell from context menu. Then click Font to apply one of the appropriate font typefaces to the cell, such as bcsDatabarM.

  • GS1-Databar barcode excel download
  • GS1-Databar barcode software order