如何将身份证号制作成条形码格式

电脑一台

office办公软件

首先在网络上下载一种条形码字体，然后将条形码字体安装于电脑中。

安装成功后，我们会在EXCEL表格的字体中找到条形码字体！

在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!

会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！

会弹出模块编辑窗口！

在代码编辑窗口输入以下代码：Sub 条形码()If [c1].Font.Name = 'C39HrP24DhTt' Then  Exit SubElse  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  NextEnd IfEnd Sub

在EXCEL的【开发工具】菜单下，点击【插入】按钮，插入一表单，并命名为【条形码】。

将【条形码】表单与编写的代码程序相关联。

点击【条形码】，会很快制作出身份证的条形码格式。