[Resolvido]Salvar imagem em objeto ole

Eu quero salvar uma imagem do internet explorer pelo vba e adicionar em um campo de objeto ole...eu consigo conectar e tenho a url da imagem só preciso saber como salvar e adicionar no campo...alguem pode me ajudar ?

Aguardo respostas...Obrigado!

to tentando adicionar uma imagem em objeto ole pelo caminho dela

Código:


Me.Capa = LoadPicture("C:\Users\Luciana\Documents\Alan\capas\21.jpg")


mas nao ta dando certo

manualmente eu clico no objeto em adicionar e seleciono bitmap imagem e colo no paint que abre a imagem dai ela aparece no lugar...alguem sabe como fazer esse processo pelo caminho da imagem ?

já tentei até isso e não dá´
[code]

Dim cap As Object

Set cap = LoadPicture("C:\Users\Luciana\Documents\Alan\capas\21.jpg")

Me.Capa.Picture = cap

[~/code]

consegui inserir a foto assim:

Código:


With Me.Capa
        .Class = "Paint.Picture"
        .OLETypeAllowed = acOLEEmbedded
        .SourceDoc = "C:\Users\Luciana\Documents\Alan\capas\21.jpg"
        .Action = acOLECreateEmbed
End With

mas fica só o icone dela, ela não aparece...alguem sabe como fazer ela aparecer ?

ae consegui alguma coisa assim:

Código:


With Me.Capa
        .Class = "Paint.Picture"
        .OLETypeAllowed = acOLEEmbedded
        .Action = acOLEPaste
        .Action = acPropertyWidth
End With


mas falta eu conseguir copiar a imagem no clipboard pela url...se conseguir eu posto o resultado..se alguem souber ajuda ai...vlw!

não consegui ainda, alguem tem alguma sugestão ?