Script VBA do Outlook - localize e substitua texto por imagem

Question

Eu tenho uma loja de comércio eletrônico. Quando obtenho uma venda, recebo um e-mail de confirmação do pedido que contém o nome do produto vendido. Quando o email chegar, eu gostaria de executar um script que substitui o nome do produto, por exemplo. "widget vermelho", com uma foto desse produto. Isso é possível?

Encontrei um código semelhante para substituir o texto (conjunto de números, neste caso) por um link, mas preciso substituí-lo por uma imagem.

Option Explicit

Sub InsertHyperLink(MyMail As MailItem)
    Dim body As String, re As Object, match As Variant

    body = MyMail.body
    Set re = CreateObject("vbscript.regexp")
    re.Pattern = "#[0-9][0-9][0-9][0-9][0-9][0-9]"

    For Each match In re.Execute(body)
        body = Replace(body, match.Value, "http://example.com/bug.html?id=" & Right(match.Value, 6), 1, -1, vbTextCompare)
    Next

    MyMail.body = body
    MyMail.Save
End Sub

email de exemplo

Order Confirmation

Thanks for shopping with us today!
------------------------------------------------------
Order Number: 2209 Date Ordered: Friday 28 June, 2013

Products
------------------------------------------------------
1 x red widget = $5.00
------------------------------------------------------
Total: $0.00

Delivery Address xxx

texto de pesquisa: "widget vermelho"
substituir imagem: redwidget.jpg