VBA：将字节数组转换为Image而不保存它

Question

我从base64获得了一个解码后的字节数组（我需要这个，所以我可以通过XML文件发送这些字节数组）。 现在，我必须重新组合＆＃34;使用bytes数组的图像。我已经搜索了类似的内容，并且我已经找到了VB代码的解析，但它与VBA不兼容。

我的代码如下所示：

encodedImage = objXML.FirstChild.ChildNodes.Item(1).Text 'the encoded image in base64

' get array of bytes
Dim byteArr() As Byte
byteArr = DecodeBase64(encodedImage) 'this function decodes from base64 to bytes array

 Dim img As Image

字节数组看起来不错，因为我已经将它与我想要重构的原始图像中的imageData进行了比较。

有没有办法在不保存临时图像的情况下进行此转换？ 在＆＃34;重新组合＆＃34;图像，我需要将其上传到文档中。

Answer 1

我可能错了，但我认为.NET框架的System.IO.File库中有一个函数可以执行您要查找的内容并写入文件路径。我认为它叫做WriteAllBytes？您可能需要导入库。希望这可以帮助。