如何将字节数组转换为Image并在excel单元格中显示

Question

我正在尝试将Byte()转换为Image，因此我可以在Cell的{​​{1}}上显示它，但我无法将其显示在WorkSheet上。在互联网上找到它。

我从XML的Byte()编码属性中获取Base64。它看起来像这样：

<ProdutoImagem>
    <Produto>05320</Produto>
    <imagens>
        <ImagemProdutoCor>
            <Cor>20729</Cor>
            <Sequencia>00</Sequencia>
            <Imagem>9j/4AAQSkZJRgABAQEB..... lot of lines here........AAAAAAAKpAMAAQAAAAAAAAAM</Imagem>
        </ImagemProdutoCor>

        <ImagemProdutoCor>
            ...
        </ImagemProdutoCor>
    </imagens>
</ProdutoImagens>

我试图获得＆＃34; Imagem＆＃34;属性。这是我到目前为止检索它的代码（但尚未经过测试）。

Dim Node As IXMLDOMNode
Dim Xml As DOMDocument
Dim Imagem() As Byte


Xml.Load (<confidential link that I can't share>)

For Each Node In Xml.DocumentElement.ChildNodes.Item("imagens")
    If (Node.nodeName = "ImagemProdutoCor") Then
        Node.NodeType = "bin.base64"
        Imagem = Node.nodeTypedValue
        Exit For
    End If
Next

问题：如何将Imagem()转换为Image属性，以便我以后可以在工作表中进行渲染？
我在Microsoft Office Excel 2007上使用VBA。