返回目录:office365
条形码 (barcode)是将宽度不等的多个黑条和空白,按照一定的编码规则排列,用以表达一组信息的图形标识符。在商场中的商品上都有条形码,用扫码器或者扫码软件对其扫描就能获得该商品的相关信息。
以下步骤介绍如何在excel中批量自动生成条形码:
1、添加开发工具
点击【文件】→【选项】→【自定义功能区】;在该面板上勾选主选项卡中的【开发工具】栏。
2、插入条形码
点击刚刚添加到主选项卡中的【开发工具】→【插入】;选择ActiveX控件栏右下角的【其他控件】按钮
3、 在弹出的【其他控件】对话框中选择Microsoft Barcode Control 15.0;然后点击确定;此时鼠标变为一个十字光标
4、 接着用鼠标在屏幕上拖动就会出现一个系统默认的条形码,如图所示:
5、编辑条形码
右键点击条形码,在弹出的菜单中选择Microsoft Barcode Control 15.0对象→属性7a686964616fe4b893e5b19e336;在弹出的属性对话框中样式选择7-code-128;如图所示
6、 小编把我想要条形码表示的信息“999999999”输入A10单元格中;接着右键点击条形码;选择【属性】,在弹出的【属性】对话框中的Linkecell栏中输入a10;这时我们会发现条形码变为我想要的形式了。
条形码 (barcode)是将宽度不等的多个黑条和空白,按照一定的编码规则排列,用以表达一组信息的图形标识符。在商场中的商品上都有条形码,用扫码器或者扫码软件对其扫描就能获得该商品的相关信息。
以下步骤介绍如何在excel中批量自动生成条形码:
1、添加开发工具
点击【文件】→【选项】→【自定义功能区】;在该面板上勾选主选项卡中的【开发工具】栏。
2、插入条形码
点击刚刚添加到主选项卡中的【开发工具】→【插入】;选择ActiveX控件栏右下角的【其他控件】按钮
3、 在弹出的【其他控件】对话框中选择Microsoft Barcode Control 15.0;然后点击确定;此时鼠标变为一个十字光标
4、 接着用鼠标在屏幕上拖动就会出现一个系统默认的条形码,如图所示:
5、编辑条e799bee5baa6e79fa5e98193e59b9ee7ad94363形码
右键点击条形码,在弹出的菜单中选择Microsoft Barcode Control 15.0对象→属性;在弹出的属性对话框中样式选择7-code-128;如图所示
6、 小编把我想要条形码表示的信息“999999999”输入A10单元格中;接着右键点击条形码;选择【属性】,在弹出的【属性】对话框中的Linkecell栏中输入a10;这时我们会发现条形码变为我想要的形式了。
条形码制作完成,批量制作还有步骤:
工具:条形码与Excel报表.Table。
该文件包括两个表,分别是SaleOrder(订单)和SaleOrderDetail(订单明细),希望用Excel报表打印订单,其中Lot列以条形码的形式打印:
1、首先在设计Excel报表模板的时候,如下图所示将Lot列的内容设置为: [&&BarCode.gif,2,2,60,20]
2、最后将BuildDetail事件代码设置为:
If e.Book.TempLate = "SalesInvoice" Then
If e.region = "SaleOrderDetail" Then
If e.DataRow Is Nothing OrElse e.DataRow.IsNull("Lot") Then '如果是空行或者Lot列为空
Dim img As New System.Drawing.Bitmap(1,1) '生成一个空白图片
img.Save(ProjectPath & "Images\BarCode.gif")
Else '否则生成条形码图片
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.Code = e.DataRow("Lot")
Bar.BarRatio = 0.3
Bar.BarHeight = 8
bar.SaveImage(ProjectPath & "Images\BarCode.gif",300)
End If
End If
End If
提示:
1、上面用于生成空白图片的代码涉及Foxtable之外的知识,只需套用即可,无需刻意理解。
2、BarCodeBuilder会在条形码这一章专门讲述。
在EXCEL2010中制作条形码十分方便,可以调用系统内置的"Microsoft BarCode 控件14.0"来实现,配合激光打印机和专业纸张,可以制作出与专业条形码机与软件相媲美的效果,可节省不少办公开支
工具/原料
EXCEL2010软件
1
打开EXCEL2010,发现"开发工具"选项卡没有显示出来
2
点击"文件"选项卡下的"选项",弹出"EXCEL选项"对话框,点击"自定义功能区"选项卡,勾选"主选项卡"下的"开发工具",点击"确定"按钮,退出对话框
3
"开发工具"选项卡,被显示出来了
END
1
点击"开发工具"选项卡,"插入"-"其他控件"
2
"其他控件"对话框内找到"Microsoft BarCode控件14.0"点击一下,并按"确定"按钮
3
此时鼠标变为"+"形状,根据实际需要,拖动鼠标画一B2单元格大小的矩形
4
放开鼠标自动生成了一个条形码
END
1
右键点击"条形码"对象,弹出快捷菜单中选择"Microsoft BarCode控件14.0对象"并单击"属性"命令项
2
弹出"Microsoft BarCode控件14.0对象"对话框,按照实际需求选择一种样式e799bee5baa6e79fa5e98193e78988e69d83361,本例选择第6种样式,并按"确定"按钮,此时条形码发生了变化
3
下一步要求按照我们给的条形码字符(14806501A023)来生成条形码图
鼠标右击条形码对象,弹出快捷菜单,点击"属性"命令项
4
弹出"属性"设置对话框,在"Linked Cell"处输入A2,"Value"字段处自动填写上了A2单元格的内容"14806501A023",点击右上角X,关闭设置,并退出
5
点击"开发工具"选项卡,下的"设计模式"来结束设计,这一步操作是关键,切记!
6
按照指定的条形码字符,自动生成了条形码
END
点击"快速访问工具栏"中的"打印预览"
按照打印输出的要求设置打印机,最后点击"打印"按钮即可
第一步:调出"开发工具"选项卡
第二步:调出"Microsoft BarCode控件14.0"
第三步:对条形码进行相关设置
第四步:打印重码
1、首先在A列输入需要生成条形码的数字。
2、然后选中数据区域并将该区域行高设置为50。
3、复制下列内容并粘贴到C1单元格内:
<table><imgsrc="http://t.ashiyue.com/img/barcodegen/html/image.php?filetype=PNG&dpi=72&scale=2&rotation=0&font_family=Arial.ttf&font_size=14&text=
4、复制下列内容并粘贴到D1单元格内:
&thickness=20&start=NULL&code=BCGcode128"/>
5、在B2单元格内输入下面的公式并进行下拉填充操作。
=$C$1&A2&$D$1
6、复制B列数据区域的内容,之后将内容粘贴至记事本内。
7、将记事本中的内容全部选7a64e4b893e5b19e337中并进行复制。
8、再次切换到EXCEL主界面,在B2单元格上单击鼠标右键选择“选择性粘贴”,选择Unicode文本。
9、之后可以看到B列单元格批量生成了条形码。