怎么在excel2013中制作二维码

2017-03-19

二维码不光是在商品消费商被越来越多采用,小公司或个人也可以用二维码来传递识别特定信息。那么,怎么在excel2013中制作二维码呢?下面小编来告诉你吧。

excel2013中制作二维码的步骤:

打开Excel,因为之后要用到VBA,进入Excel选项,勾选“在功能区显示开发工具”(图1),切换到开发工具选项卡,单击Visual Basic打开VBA编辑器,选择“工具→引用→浏览”,找到c:windowssystem32QRMaker.ocx,关闭编辑器。

回到Excel中,在空白处插入一个命令按钮,右击该按钮选择指定宏→录制,宏命名为print2d,停止录制宏。

同时插入其他控件中的QRMaker Control,点“确定”后鼠标会变成十字,在空白区域画一个二维码控件(图2)。

再次打开VBA编辑器,在左边找到模块1,双击后清空右边所有内容,输入以下代码:

Sub print2d()

Dim QRString1 As String

'定义变量

QRString1 = Sheet1.Range("A1")

'将A1单元格的值传递给QRString1

Sheet1.Select

Sheet1.QRmaker1.AutoRedraw = ArOn

'启用QRmaker的自动重画属性

Sheet1.QRmaker1.InputData = QRString1

'将QRString1的值传递给QRmaker1

End Sub

保存关闭VBA编辑器,回到Excel(图3),单击Print2D按钮就可以将A1单元格的内容生成二维码。

制作完毕,就可以使用这个二维码了,用胸卡在扫描枪上扫描,即可对特定数据进行操作了。

怎么在excel2013中制作二维码相关文章:

1.怎么在excel2013中制作组合图表

2.excel2013怎么制作饼状图

3.怎么在excel2013中制作柱状图

4.如何在excel2013中制作一个复合饼图

5.怎么在excel2013中制作一个2级目录

6.excel2013怎么制作双层饼图

更多相关阅读

最新发布的文章