纯VBA生成条形码

兰色的回忆

luzwales 发表于 2022-9-2 16:41
就在Function 块中调用这个 怎么不行呢？

这个东西不是你这么用滴，你这用法太简单粗暴了

luzwales

兰色的回忆 发表于 2022-9-2 16:54
这个东西不是你这么用滴，你这用法太简单粗暴了

不是这样用？
按钮 调用这个sub 和函数调用这个sub不一样？
才学这个VBA 几个星期？ 不是很懂？
开始我准备将 签名的字符串和图片的输出位置以参数的输入的， 发现都不行。
最后我直接调用这个sub都不行！

morpheus126

兰色的回忆 发表于 2022-9-2 09:16
如二楼所说，第六页的确实更好用，楼主发的这个代码，生成的二维码都是一条条的细线，不是太实用，我整理了 ...

大哥工作表保护密码多少。。。谢谢

兰色的回忆

luzwales 发表于 2022-9-2 17:01
不是这样用？
按钮 调用这个sub 和函数调用这个sub不一样？
才学这个VBA 几个星期？ 不是很懂？

肯定是不一样的，像生成条形码这种高级功能不要用自定义函数这种方法，自定义函数的使用是有条件的：
在由工作表单元格中的公式调用时，用户定义函数不能执行更改 Microsoft Excel 环境的操作。
由工作表单元格中的公式调用的用户定义函数不能更改 Microsoft Excel 的环境。这意味着此类函数不能执行以下任何操作：
•在电子表格中插入、删除单元格或设置单元格格式。
•更改其他单元格中的值。
•在工作簿中移动、重命名、删除或添加工作表。
•更改任何环境选项，例如计算模式或屏幕视图。
•向工作簿中添加名称。
•设置属性或执行大多数方法。
用户定义函数旨在允许用户创建不包括在 Microsoft Excel 随附函数中的自定义函数。Microsoft Excel 中包括的函数也不能更改环境。函数可以执行计算以在输入它们的单元格中返回某个值或文本。任何环境更改都应通过使用 Visual Basic 子例程来完成。
计算过程中，Excel 会检查包含用户定义函数的单元格的引用单元格。如果未计算所有引用单元格，Excel 会向函数传递空单元格。然后，Excel 将确保针对要计算的所有引用单元格进行了足够的计算传递。在进行最后的计算传递过程中，会向用户定义函数传递单元格的当前值。这会导致比预期更频繁地调用用户定义函数。因此，用户定义函数可能返回意外值。

要进行正确的计算，计算中使用的所有区域都应该作为自变量传递给函数。如果不以自变量形式传递计算区域，而是引用函数的 VBA 代码中的区域，Excel 将无法在计算引擎中考虑这些区域。因此，Excel 可能无法对工作簿进行适当地计算，来确保在计算用户定义函数之前计算所有引用单元格。

兰色的回忆

morpheus126 发表于 2022-9-2 17:47
大哥工作表保护密码多少。。。谢谢

你复制走代码就行了，代码我又没加密。。。

gaozengxun

收藏研究研究

wumisandao

新人来学习，感谢大家分享

lxw6

有人私信我，问条码字体做条形码的方法。
1. 条码字体下载，见链接的3楼：https://club.excelhome.net/thread-1137113-1-1.html
2. 条码字体生成条形码。详见https://zhidao.baidu.com/question/264241991389804485.html

morpheus126

lxw6 发表于 2022-9-3 22:43
有人私信我，问条码字体做条形码的方法。
1. 条码字体下载，见链接的3楼：https://club.excelhome.net/thr ...

您好，想了解一下code39和code128这些有什么区别，不知道有无文章推荐，谢谢

洒脱闲云

兰色的回忆 发表于 2022-9-2 09:16
如二楼所说，第六页的确实更好用，楼主发的这个代码，生成的二维码都是一条条的细线，不是太实用，我整理了 ...

sh.PasteSpecial Format:="Picture (Enhanced Metafile)", Link:=False, DisplayAsIcon:=False

点测试二就说这段代码有问题，不知道是什么回事