Excel表格里躺着一千个客户名单,量生老板让你挨个生成二维码发出去。量生你打开在线转换工具,量生复制粘贴一百次,量生手酸了,量生眼睛花了,量生下班还遥遥无期。量生别急着骂人,量生Excel自己就能干这活,量生只是量生大多数人不知道。
先看效果:A列是量生网址或文本,B列自动蹦出对应二维码。量生双击填充柄,量生两秒扫完全部数据。量生听起来像变魔术?量生其实就三步——调出开发者工具,插入ActiveX控件,写三行代码。
第一步,按Alt+F11打开VBA编辑器。别被这蓝底白字的界面吓住,你不需要懂编程。在菜单栏点“插入”→“模块”,然后复制这段代码进去:
Function QRCodeGen(txt As String) As String QRCodeGen = "https://api.qrserver.com/v1/create-qr-code/?size=200x200&data=" & txt End Function
这段代码的作用是调用一个免费二维码生成接口。关掉编辑器,回到表格,在B2单元格输入公式:
=QRCodeGen(A2),回车。B2立刻出现一个网址链接,但这不是二维码——真正的二维码需要图片。别急,还有关键一步:在B列旁边插入一列C,C2输入:=IMAGE(B2)。Excel 365或2021版本支持这个函数,旧版本的话,得改用“插入”→“图片”→“来自网站”手动操作。实际测试中,我拿五十个产品链接跑了一遍,生成速度取决于网络——每张图大约0.3秒,比手动复制粘贴快上十倍不止。有个朋友用这招处理学校食堂的菜品溯源二维码,原来要加班两小时,现在泡杯咖啡的功夫就完事。
但这个方法有个坑:免费接口有每日调用次数限制,超过五百次会返回灰色占位图。解决办法也简单,把代码里的链接换成自己服务器上的接口,或者用Excel的VBA直接调用本地二维码库。后者更稳定,但需要安装额外插件,对多数人来说没必要。
另一个更笨但更可靠的法子:用条件格式的“图标集”假装二维码?别闹了,那只是装饰,扫不出来。真正要批量生成,还得靠上面的函数法。不过提醒一句:生成的二维码默认是黑白的,如果你想要彩色或者带Logo的,得去接口文档里改参数——把代码里的
size=200x200改成size=300x300&color=255-0-0就能得到红色版本。最后说个细节:二维码内容里如果带中文,直接拼进URL会乱码。处理方法是先用Excel的
ENCODEURL()函数转码,比如:=QRCodeGen(ENCODEURL(A2))。这个坑我踩过,当时生成的二维码扫出来全是问号,折腾了半小时才找到原因。这套方法不挑Excel版本,WPS同样适用。唯一的硬性要求是电脑能联网——毕竟图片来自云端接口。要是哪天断网了,你还可以用Excel自带的“开发工具”→“其他控件”→“Microsoft Barcode Control”,但那个生成的条形码丑得没法看,而且只能扫出数字。
说到底,工具总是有的,关键是你知不知道它藏在哪儿。下次再被要求批量做二维码,别急着点开那些弹窗广告的在线工具,先打开Excel的VBA编辑器试试。省下的时间,够你刷完今天的短视频了。
顶: 9399踩: 81






评论专区