ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Import URL picture into Excel cell (https://www.excelbanter.com/excel-programming/425595-import-url-picture-into-excel-cell.html)

Gandalf

Import URL picture into Excel cell
 
I am trying to import a picture off of the internet, not data, into an Excel
cell. I also do not want to have the image double clicked into an IE window.

I have extrapolated the following off of many web information pages. It
looks like this will require Excel's VB, to accomplish. In the Design Mode,
there is a Control involving Microsoft Web Browser, a Name Box with
WebBrowser1, and a function with =EMBED("Shell.Explorer.2",""). Excel's
Microsoft Visual Basic containing:

Private Sub Worksheet_Activate()
WebBrowser1.Navigate "www.worldcommunitygrid.org/images/pb/faah_0.jpg"
End Sub

The problem is, this will not work for me. Surprise, surprise. I am not
into VB. I'm sure someone out there in Internet land is rofl. I feel I am a
tweak away from
making this work, but what that tweak is I have no idea. You see, I have
been doing my homework, so to speak. It's just that, in the web info, I
think I am assumed to know something I don't.

The code seems to create an IE window inside the cell. It's just not
bringing in the image. Can someone show me how to make "my" code work? How
do I tell Excel that I want it to download the image?

All assistance gratefully appreciated,

Gandalf


joel

Import URL picture into Excel cell
 
This works

Sub GetPicture()
PictureURL = "http://www.worldcommunitygrid.org/images/pb/faah_0.jpg"

Set MyPict = ActiveSheet.Pictures.Insert(PictureURL)

End Sub


"Gandalf" wrote:

I am trying to import a picture off of the internet, not data, into an Excel
cell. I also do not want to have the image double clicked into an IE window.

I have extrapolated the following off of many web information pages. It
looks like this will require Excel's VB, to accomplish. In the Design Mode,
there is a Control involving Microsoft Web Browser, a Name Box with
WebBrowser1, and a function with =EMBED("Shell.Explorer.2",""). Excel's
Microsoft Visual Basic containing:

Private Sub Worksheet_Activate()
WebBrowser1.Navigate "www.worldcommunitygrid.org/images/pb/faah_0.jpg"
End Sub

The problem is, this will not work for me. Surprise, surprise. I am not
into VB. I'm sure someone out there in Internet land is rofl. I feel I am a
tweak away from
making this work, but what that tweak is I have no idea. You see, I have
been doing my homework, so to speak. It's just that, in the web info, I
think I am assumed to know something I don't.

The code seems to create an IE window inside the cell. It's just not
bringing in the image. Can someone show me how to make "my" code work? How
do I tell Excel that I want it to download the image?

All assistance gratefully appreciated,

Gandalf



All times are GMT +1. The time now is 04:53 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com