怎么在excel2013中制作二维码

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

　　excel2013中制作二维码的步骤

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

excel2013中制作二维码的步骤图1

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

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

excel2013中制作二维码的步骤图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中制作二维码的步骤图3

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

　　>>>下一页更多精彩“excel2013中制作组合图表的方法”

怎么在excel2013中制作二维码

http://m.htbtob.com/kaoshengxiangguan/36264.html