将 Code128 条形码集成到 MS Excel
该实现通过使用管理员权限命令提示符**注册 COM DLL 接口**(64 位系统使用 cruflbcs_x64.dll,32 位环境使用 cruflbcs.dll),在电子表格中配置 Code 128 条形码的动态编码。在 Excel 信任中心**启用所有宏**后,使用 ALT + F11 打开 VBA 编辑器,**绑定 crUFLBcs 类型库引用**并导入 barcodesoft.bas 模块。随后通过**原生列公式**(如 =Code128B(A1))即时转换数据,并通过分配专用条形码字体 Code128mHr 进行可视化渲染。
步骤 1. 右键单击命令提示符并选择“以管理员身份运行”。
cd "C:\Program Files\Common Files\Barcodesoft\FontUtil"
%systemroot%\System32\regsvr32.exe cruflbcs_x64.dll
输入以下命令以注册 cruflbcs.dll:cd "C:\Program Files (x86)\Common Files\Barcodesoft\FontUtil"
regsvr32.exe cruflbcs.dll
步骤 2. 启动 Microsoft® Excel®。
如果您使用的是 Excel 2000 或 2003,请选择菜单 ===> 工具 (Tools) ==> 宏 (Macro) ===> 安全性 (Security)。选择“低 (Low)”安全性级别。
步骤 3. 按 ALT + F11 打开 Microsoft® Visual Basic 编辑器。
步骤 4. 在 Visual Basic 编辑器中,选择菜单“工具 (Tools) ===> 引用 (References)”。将出现一个对话框。单击“浏览 (Browse)”按钮,在您的工作文件夹中选择 cruflbcs.dll。它通常位于 C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil 文件夹中。勾选 crUFLBcs 1.0 Type Library 前的复选框,如下所示。然后点击确定按钮。
步骤 5. 按 Ctrl+M,将出现一个对话框,选择 C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil 文件夹中的 barcodesoft.bas。然后单击“打开 (Open)”。
如果找不到 barcodesoft.bas,请从 Code128 下载。
步骤 6. 关闭 Visual Basic 编辑器并返回到您的电子表格。现在您可以使用以下宏对数据进行编码:Code128。当您有大量数据需要处理时,只需将宏复制并粘贴到整个列中,所有数据都会立即被编码。
=Code128A(xxx)
=Code128B(xxx)
=Code128C(xxx)
使用单元格引用来替换公式中的 xxx,如下所示。
步骤 7. 右键单击单元格 B1,然后从右键菜单中选择“设置单元格格式 (Format Cell)”。然后单击“字体 (Font)”,将合适的字体应用到该单元格,例如 Code128mHr。