生成 GS1128 条形码

1. 初始化宏信任设置

适用于 Excel 2007 / 2010 / 2013 / 2016 / 2019 / 365： 点击 Office 菜单中的 文件 → 选项 → 信任中心 → 信任中心设置 → 宏设置，然后勾选 "启用所有宏"。

旧版 Office (2000/2003)： 请依此导航：工具 → 宏 → 安全性，将其配置为“低”。

2. 启动 Visual Basic 窗口

同时按下快捷键 ALT + F11 来调出内置的 VBA 编辑器面板。

3. 建立引用库连接

在编辑器中，点击 工具 → 引用 (Tools → References)。在弹出的路径搜索窗口中，直接指向并选择 cruflbcs.dll 模块文件（该文件通常位于 C:\Program Files (x86)\Common Files\Barcodesoft\Fontutil 文件夹下）。确保勾选并确认了 crUFLBcs 1.0 Type Library 复选框。

4. 导入模块自动化宏

按下快捷键 Ctrl + M 打开文件导入弹出框。从上述提到的文件路径中选择并导入 barcodesoft.bas 模块组件。如果找不到该文件，可以通过压缩包链接下载包源码：cruflbcs.zip。

5. 编写列公式

关闭 Visual Basic 编辑器，返回到工作表的电子表格网格中。使用标准的单元格引用语法，在所需的工作簿数据行中执行处理公式：

注意：请务必严格遵守标准字符串规则，将标识符牢固地包裹在圆括号内。

6. 设置条形码字体样式属性

右键单击目标输出单元格（例如 B1），选择 "设置单元格格式" 属性。在字体设置选项卡中，选择匹配的字型名称 code128mHr。确保字形（字型样式）设置为 常规 (Regular)，且 下划线 设置为 无。

1. 调整数据库安全属性

新版 Access 系统： 依次进入 Access 选项菜单面板 → 信任中心 → 信任中心设置 → 宏设置 → 勾选 "启用所有宏"。

2. 运行 Visual Basic 引擎窗口

立即使用组合快捷键启动 VB 应用程序开发环境：ALT + F11。

3. 引用类型库扩展

打开 工具 → 引用 选项界面。点击浏览来定位库文件，引入依赖项跟踪模块 cruflbcs.dll。选中 crUFLBcs 4.0 Type Library 旁边的复选框，然后保存完成操作步骤。

4. 追加模块文件函数库

按下快捷键 Ctrl + M，直接使用模块框架包中的标准模板文件组件 barcodesoft.bas 导入脚本结构。

5. 编写报表宏表达式

退出 VBA 开发窗口，安全返回数据库设计器环境，并将报表工作区视图切换至标准的 设计视图 (Design View)。在目标文本框对象的控件来源 (Control Source) 中精确输入格式化表达式值：

请将“表名”替换为您数据库的实际表名，“字段名”替换为您代码数据字段的实际名称。

6. 完成排版系统配置

右键单击目标报表文本框控制区域，从右键菜单中选择 属性 (Properties)。修改控件样式参数，让文本的显示渲染行为采用匹配系统字体名称登记的字型系统 GS1128m。