二维码不光是在商品消费商被越来越多采用,小公司或个人也可以用二维码来传递识别特定信息。那么,怎么在excel2013中制作二维码呢?下面小编来告诉你excel2013中制作二维码的方法吧。希望对你有帮助!
打开Excel,因为之后要用到VBA,进入Excel选项,勾选“在功能区显示开发工具”(图1),切换到开发工具选项卡,单击Visual Basic打开VBA编辑器,选择“工具→引用→浏览”,找到c:\windows\system32\QRMaker.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单元格的内容生成二维码。
制作完毕,就可以使用这个二维码了,用胸卡在扫描枪上扫描,即可对特定数据进行操作了。
首先制作基础表格,以每月花销举例。
插入图表,并在“设计”下面点击“选择数据”
选择“图表数据区域”,选择数据区域,回车,确定,生成图表。
下面将“其他”费用转换为折线图。
1)、选中图表,在菜单栏中“布局”,点击左上角下拉框,选择“其他”;
2)、选择“设计”-“更改图表类型”,选择折线图,确定。
完成。
猜你喜欢:
1.excel2013如何添加加载项的教程
2.怎么在excel2013中快速生成图表
3.excel2013柏拉图制作教程
4.excel2013怎么将二维表转换成一维表
5.excel2013如何创建宏
6.excel2013怎么新建模板表格