-
在实际工作中,有时需要将身份证号,制作成条形码格式,以方便扫描使用,下面就和大家分享这方面的经验。
工具/原料 电脑一台 office办公软件 方法/步骤 1 首先在网络上下载一种条形码字体,然后将条形码字体安装于电脑中。
2 安装成功后,我们会在EXCEL表格的字体中找到条形码字体!
3 在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!
4 会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!
5 会弹出模块编辑窗口!
6 在代码编辑窗口输入以下代码: Sub 条形码() If [c1].Font.Name = "C39HrP24DhTt" Then Exit Sub Else Columns(3).Insert [c1].ColumnWidth = 31 Set Rng = Range("b1", Cells(Rows.Count, 2).End(xlUp)) For Each rn In Rng Cells(rn.Row, 3) = "*" & rn.Value & "*" With Cells(rn.Row, 3).Font .Name = "C39HrP24DhTt" .Size = 28 End With Next End If End Sub
7 在EXCEL的【开发工具】菜单下,点击【插入】按钮,插入一表单,并命名为【条形码】。
8 将【条形码】表单与编写的代码程序相关联。
9 点击【条形码】,会很快制作出身份证的条形码格式。
如本站内容“对您有用”,欢迎随意打赏,让我们持续更新!
打赏