excel/wps, 转code128字体宏, 部分字符串出现空格, 导致条码断裂无法扫描的解决方案

原宏是网上抄的, 传播比较广的那个.

后来发现, 部分条码出现空格断裂, 导致PDA无法扫描, 经搜索在一个帖子里, 发现是因为: 宏计算条码时, 会出现校验位刚好是空格的情况, 而空格在code128字体里是不显示的, 所以最后的现象就是条码断裂, 无法扫描

解决思路, 如果校验位为空格, 那么修改起始位或者结束位, 来达到修改校验位的结果

修改之后的宏如下: 其中function encodeToCode128()函数由AI重写完成(原来的该函数已被注释), 经我测试没有发现问题

复制代码
function toSetC(text) {
return text.match(/\d{2}/g).map((ascii, index) => {
var codeC = Number(ascii);
var charCode = codeC > 94 ? codeC + 100 : codeC + 32;
return String.fromCharCode(charCode)
}).join('');
}

function checkSum128(data, startCode) {
var sum = startCode;
for (var i = 0; i < data.length; i++) {
var code = data.charCodeAt(i);
var value = code > 199 ? code - 100 : code - 32;
sum += (i + 1) * (value);
}
var checksum = (sum % 103) + 32;
if (checksum > 126) checksum = checksum + 68 ;
return String.fromCharCode(checksum);
}

//function encodeToCode128(text, codeABC = "B") {
//text = text.Text ?? text
//var startCode = String.fromCharCode(codeABC.toUpperCase().charCodeAt() + 138);
//var stop = String.fromCharCode(206);
//text = codeABC == 'C' && toSetC(text) || text;
//var check = checkSum128(text, startCode.charCodeAt(0) - 100);
////text = text.replace(" ", String.fromCharCode(194));
//return startCode + text + check + stop;
//}

function encodeToCode128(text, codeABC = "B") {
    text = text.Text ?? text;
    var originalStartCode = codeABC.toUpperCase().charCodeAt() + 138; // e.g., 'B' → 204
    var startCode = originalStartCode;
    var stopCode = 206;
    var encodedText = codeABC == 'C' ? toSetC(text) : text;
    
    // 计算默认校验位
    var check = checkSum128(encodedText, startCode - 100);
    var checksum = check.charCodeAt(0);
    
    // 仅在校验位为空格(32)时尝试调整起始符和结束符
    if (checksum === 32) {
        // 尝试不同的起始符(A/B/C)
        var startOptions = [
            203, // Start A
            204, // Start B
            205  // Start C
        ];
        
        for (var i = 0; i < startOptions.length; i++) {
            var newStartCode = startOptions[i];
            if (newStartCode === originalStartCode) continue; // 跳过原始起始符(已经计算过)
            
            check = checkSum128(encodedText, newStartCode - 100);
            checksum = check.charCodeAt(0);
            
            if (checksum !== 32) {
                // 找到非空格校验位,使用新的起始符
                startCode = newStartCode;
                break;
            }
        }
        
        // 如果所有起始符都导致空格校验位,尝试修改停止符(206→238)
        if (checksum === 32) {
            stopCode = 238;
            check = checkSum128(encodedText, startCode - 100); // 重新计算校验位
        }
    }
    
    return String.fromCharCode(startCode) + encodedText + check + String.fromCharCode(stopCode);
}

View Code

相关推荐
葡萄城技术团队1 天前
从100秒到10秒的性能优化,你真的掌握 Excel 的使用技巧了吗?
excel
QQ3596773453 天前
ArcGIS Pro实现基于 Excel 表格批量创建标准地理数据库(GDB)——高效数据库建库解决方案
数据库·arcgis·excel
星空的资源小屋4 天前
Digital Clock 4,一款免费的个性化桌面数字时钟
stm32·单片机·嵌入式硬件·电脑·excel
dyxal4 天前
linux系统安装wps
linux·运维·wps
揭老师高效办公4 天前
在Excel和WPS表格中批量删除数据区域的批注
excel·wps表格
我是zxb4 天前
EasyExcel:快速读写Excel的工具类
数据库·oracle·excel
辣香牛肉面4 天前
[Windows] 搜索文本2.6.2(从word、wps、excel、pdf和txt文件中查找文本的工具)
word·excel·wps·搜索文本
ChinaLzw4 天前
Python 操作Office的PPT、Word、Excel,同时兼容WPS
python·wps·office
zbailing4 天前
WPS文字
wps
ljf88384 天前
Java导出复杂excel,自定义excel导出
java·开发语言·excel