如何在Excel中创建QR码(2种合适的方法)

  • Share This
Hugh West

二维码 是加密的方块,可以包括内容、链接、事件信息以及用户希望看到的其他信息。 你可以生成 二维码 这篇文章的主要目的是演示如何创建 二维码 在Excel中。

下载实践工作手册

你可以从下面的下载链接中下载本文所使用的练习工作簿。

生成QR码.xlsm

在Excel中创建QR码的2种简单方法

在这篇文章中,我将解释两种方法,你可以通过它们来创建 二维码 为了解释这些方法,我采取了一个数据集,其中包含了 场地名称 和它的URL,也就是 价值 为我们的 二维码 .

1.使用Office插件在Excel中创建QR码

在这个方法中,我将解释如何创建 二维码 在Excel中通过使用 办公室插件 .

让我们一步一步地看看它是如何做到的。

步骤。

  • 首先,到 插入 标签。
  • 之后,选择 获取插件 选项,从 附加元件 组。

A 图书馆 将出现在屏幕上。

  • 现在,搜索一下 QR4办公室 而你将得到 QR4办公室 .
  • 接下来,点击 添加 来添加 QR4office 对你的 附加元件 .

现在,它将向你显示许可条款和政策。

  • 最后,选择 继续。 QR4办公室 将会被安装。

  • 现在,再次进入 插入 标签。
  • 之后,选择 我的插件 .

这将引导你找到你的 我的插件 图书馆。

  • 接下来,选择 QR4办公室 .
  • 最后,点击 添加 .

现在,你会看到, QR4办公室 你可以在Excel工作表上输入 文本 URL 你想要的 编码 你也可以改变颜色、大小和背景。 二维码 从这里。

  • 现在,键入 文本 URL 你想要的 编码 .在这里,我输入了 URL ǞǞǞ .
  • 最后,点击 插入 来获得你的 二维码 .

现在,我已经得到了 二维码 为我想要的网站。

按照这个相同的过程,你可以得到所有其他的 二维码 你想要的。

2.在Excel中创建用户定义的函数来创建QR码

在这第二种方法中,我将解释如何创建 二维码 在Excel中通过使用 用户定义的功能 为此,我将使用 VBA .

让我们一步一步地看看它是如何做到的。

步骤。

  • 首先,到 开发商 标签。
  • 第二,选择 视觉基础 .

现在,你会看到 视觉基础 窗口已经打开。

  • 之后,去到 插入 标签 .
  • 现在,选择 模块 选择。

你会看到一个 模块 已经打开。 在该 模块 键入以下代码。

 Function QR_Generator(qrcodes_values As String) Dim Site_URL As String Dim Cell_Values As Range Set Cell_Values = Application.Caller Site_URL = "//chart.googleapis.com/chart?chs=100x100&&cht=qr&chl=" & qrcodes_values On Error Resume Next ActiveSheet.Photo("Generated_QR_CODES_" & Cell_Values.Address(False, False)).Delete On Error GoTo 0ActiveSheet.Pictures.Insert(Site_URL).Select With Selection.ShapeRange(1) .Name = "Generated_QR_CODES_" & Cell_Values.Address(False, False) .Left = Cell_Values.Left + 2 .Top = Cell_Values.Top + 2 End With QR_Generator = " " End Function 

代码分解

  • 在这里,我创建了一个 职能 名为 QR_Generator ......下一步,使用 qrcodes_values 作为 字符串 在该函数内。
  • 然后,宣布 网站_URL 作为 字符串 细胞值 作为 范围 .
  • 接下来,使用了 应用程序.调用者 设置 属性来触发 宏观 在那里它将被调用。
  • 此后,鉴于 URL 地址为 qr码 .
  • 我,也用 出错时恢复下一步 来忽略这个错误。
  • 之后,用了 ActiveSheet.Pictures 来在活动页面中创建图片。
  • 接下来,通过使用 附声明 重新调整尺寸 qr码 .

现在。 拯救 的代码为 Excel Macro-Enabled 工作簿 并返回到你的工作表。

  • 现在,选择所有你想让你的 二维码 在这里,我选择了单元格 D5 , D6 , 和D7 .

  • 之后,写出以下公式。
=QR_Generator(C5)

在这里,我使用了 QR_Generator 函数,该函数由我定义的 VBA 代码。 而对于 qrcodes_values 我选择了单元格 C5 这个函数将返回我们 二维码 价值 在细胞中 C5 .

  • 最后,按 CTRL+ENTER 而你将得到 二维码 为所有的细胞。

阅读更多:Excel VBA:开源QR码生成器

需要记住的事情

  • 在使用第二种方法时,应该注意的是,我在这里使用了一个开放源码的链接。 因此,为了正常使用这个功能,你必须保持你的互联网连接。

练习部分

这里,我提供了一张练习表供你练习。

总结

最后,在这篇文章中,我试图解释如何创建 二维码 我介绍了两种方法,希望对你有所帮助。 想获得更多类似的文章,请访问 ǞǞǞ 如果你有任何问题,请在下面的评论区告诉我。

Hugh West is a highly experienced Excel trainer and analyst with over 10 years of experience in the industry. He holds a Bachelor's degree in Accounting and Finance and a Master's degree in Business Administration. Hugh has a passion for teaching and has developed a unique teaching approach that is easy to follow and understand. His expert knowledge of Excel has helped thousands of students and professionals worldwide improve their skills and excel in their careers. Through his blog, Hugh shares his knowledge with the world, offering free Excel tutorials and online training to help individuals and businesses reach their full potential.