在Mac VBA中生成QR码

我试图在一个运行在Mac上的Excel表格中打包并显示一系列QR码(200+)。 Patratacus给出的使用Excel VBA生成2D(PDF417或QR)条形码的第一个解决scheme需要很长时间来运行这么多的代码,而且由于QR代码是由多个形状组成的,所以屏幕刷新变得非常慢,具有200多个QR码在一张纸上。

因此,我使用Excel VBA在生成2D(PDF417或QR)条形码时使用 @Luiz解决scheme,得到了在PC上工作的代码,但不幸的是,它似乎在Mac上无法正常工作。

随着代码:

sURL = "https://api.qrserver.com/v1/create-qr-code/?" + "size=" + Trim(Str(size)) + "x" + Trim(Str(size)) + "&color=" + color + "&bgcolor=" + bgcolor + "&data=" + data Debug.Print sURL Set pic = ActiveSheet.Pictures.Insert(sURL + sParameters) 

SURL + sParameters – 似乎从API返回图像的原始数据https://api.qrserver.com/v1/create-qr-code/? 。 所以我已经能够得到一个Mac shell脚本来返回我想用的相同的原始数据:

 sResult = execShell(= "curl --get -d """ & "size=" + Trim(Str(size)) + "x" + Trim(Str(size)) + "&color=" + color + "&bgcolor=" + bgcolor + "&data=" + data & """" & " " & "https://api.qrserver.com/v1/create-qr-code/?") 

但是,如果将返回的string插入到:

 ActiveSheet.Pictures.Insert() 

在Mac上它似乎也不工作。 所以我的猜测是,在Mac ActiveSheet.Pictures.Insert()不能读取原始图像数据,只有path和文件名称的图片文件。

所以我认为我们的select是:

  1. find一个为什么要显示一个图片使用原始数据返回的API或

  2. find一种方法来将API返回的原始数据保存为Macs文件系统上的图片文件,然后使用excels ActiveSheet.Pictures.Insert()代码打开该文件。

以下是API文档页面的链接: http : //goqr.me/api/doc/create-qr-code/

我希望我上面写的是有道理的,因为我可能没有全部的术语。 我很早就使用API​​等