快好知 kuaihz

Excel表格中,如何快速批量制作条形码和二维...

生产企业,销售企业,产品ID和信息以条形码的形式记录,方便机器读取,现在又多了二维码,我们又习惯用excel处理数据,那能否用excel批量生成二维码和条码呢,答案是肯定的,这里介绍一个excel条码机二维码函数库的用法,顺便加上我写的一段vba代码来达到批量生成的效果,希望大家能够用得上!

私信回复05571即可获得代码文件

这里还有视频讲解地址,图文没看明白的同学可以看视频讲解http://toutiao.com/item/6520899925906031111/

动图展示效果

批量生成条形码二维码

第一步 下载 EXCEL API 网络函数库

搜索EXCEL API 网络函数库,可看到下载地址,按照提示下载安装,然后在excel加载项里启用

excelapinet add-in

第二步 在表格对应位置写条形码二维码公式

第三步 alt+f11 插入模块,粘贴下面代码

Sub DelPicByRng(rng As Range)

"删除指定单元格区域内的图片

Dim i As Integer

Set shps = rng.Worksheet.Shapes

For i = shps.Count To 1 Step -1 "倒序循环图片

If Not Intersect(shps(i).TopLeftCell, rng) Is Nothing Then "检测到图片位置与本区域重叠 则删除

shps(i).Delete

End If

Next i

End Sub

Sub 批量生成二维码条形码()

Dim e As Range

For Each e In Selection

e.Select

DelPicByRng e

e.FormulaLocal = e.FormulaLocal

Next

End Sub

第四步 运行宏

回到表格界面,选中写入了条形码二维码公式的单元格区域,alt+F8,运行宏<批量生成二维码条形码> 就可看到依次批量生成了二维码条形码

本站资源来自互联网,仅供学习,如有侵权,请通知删除,敬请谅解!
搜索建议:二维  二维词条  条形码  条形码词条  批量  批量词条  表格  表格词条  快速  快速词条  
办公

 5个超实用的Excel技巧,不会...

对于办公族的人来说,几乎每天都会接触到Excel表格。在Excel中,小技巧是在是太多了,关键就在我们平时的积累和运用,今天小编与大家分享5个常用的Excel技...(展开)

办公

 8个必备Excel打印技巧,全部...

在之前的文章中,我们介绍过如何打印不同需求的Word文档。有小伙伴在后台留言,说希望介绍一下Excel打印技巧,因为表格打印,更容易出错。今天就为大家介绍8种使...(展开)

办公

 六个实用的小技巧

我们在电脑的使用过程中,合理地使用一些快捷组合键可以起到事半功倍的效果。以下的六个实用的小技巧,虽然很实用,但你会熟练使用它们吗?一、放大镜:当电脑的一些东西,...(展开)