Code 39 barcode is one of the most widely used barcode symbologies. It's a smart and simple solution to use Barcodesoft Code39 barcode fonts to generate Code39 Barcodes: just put asterisks before and after your data, then apply Barcodesoft font, such as Code39mHr.
With Barcodesoft Code39 barcode package and Microsoft® Office, it is very convenient to print code39 bar code from your Windows computer and 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 Vista 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
3. Start Microsoft® Excel® first.
If you are using Excel 2000 or 2003, click menu ===> Tools ==> Macro ===> Security. Choose Low security level.
If you are using Excel 2007 / 2010 / 2013 / 2016 / 2019, click the Microsoft Office Button.
Then click Excel Options, choose Trust Center. In the Macro Settings category, under Macro Settings, choose "Enable all macros" as shown below.
4. Press ALT + F11 to open Microsoft® Visual Basic editor.
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.
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 code39.
7. Close Visual Basic editor and go back to your spreadsheet. Now, you can use one of the following macros to encode data: Code39, Code39Mod43. 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 in seconds.
Please use cell reference to replace xxx in the formulas as shown below.
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 Code39mHr.