如何把excel信息做成二维码?.doc

时间:2022-05-11 14:29:44 阅读: 最新文章 文档下载
说明:文章内容仅供预览,部分内容可能不全。下载后的文档,内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的,是否完整无缺。
如何把excel信息做成二维码?

新建一个Excel表格,在A1单元格中输入需要生成二维码的代码信息。

1. 先要下载一个控件qrmaker,下载的文件解压后,将QRMaker文件夹里的所有文件复制到c:\windows\system32regsvr32 c:\windows\system32\QRmaker.ocx注册组件。

2. 打开Excel,因为之后要用到VBA,进入Excel选项,勾选在功能区显示开发工具,切换到开发工具选项卡,单Visual Basic打开VBA编辑器,选择工具引用浏览找到c:\windows\system32\QRMaker.ocx,关闭编辑器。 3. 回到Excel中,在空白处插入一个命令按钮,右击该按钮选择指定宏录制,宏命名为print2d,停止录制宏。 4. 同时插入其他控件中的QRMaker Control,点确定后鼠标会变成十字,在空白区域画一个二维码控件。 5. 再次打开VBA编辑器,在左边找到模块1,双击后清空右边所有内容,输入以下代码:Sub print2d()Dim QRString1 As String定义变量QRString1 = Sheet1.Range(A1)A1单元











QRString1Sheet1.SelectSheet1.QRmaker1.AutoRedraw = ArOn启用QRmaker的自动重画属性Sheet1.QRmaker1.InputData = QRString1QRString1的值传递给QRmaker1End Sub保存


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

制作完毕,就可以使用这个二维码了。


本文来源:https://www.wddqw.com/doc/81f6d4a8e55c3b3567ec102de2bd960591c6d92a.html