ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Update A Url Image (https://www.excelbanter.com/excel-programming/418802-update-url-image.html)

SEAN DI''''ANNO

Update A Url Image
 
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a Product
code, when entered another cell changes (using a vlookup) be the URL image of
the product. Using the above code, it displays the URL image which is great.
However, when the product code is changes again, it just inserts another
picture rather than update the existing one. How can I have an object set to
the URL reference so that it can updated everytime the product code is
changed.

Charlotte E.

Update A Url Image
 
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse ...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the URL image
of
the product. Using the above code, it displays the URL image which is
great.
However, when the product code is changes again, it just inserts another
picture rather than update the existing one. How can I have an object set
to
the URL reference so that it can updated everytime the product code is
changed.




Charlotte E.

Update A Url Image
 
Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before inserting a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse ...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the URL
image of
the product. Using the above code, it displays the URL image which is
great.
However, when the product code is changes again, it just inserts another
picture rather than update the existing one. How can I have an object set
to
the URL reference so that it can updated everytime the product code is
changed.






SEAN DI''''ANNO

Update A Url Image
 

...Which is my problem Charlotte. if the product No is changed several
times, a new picture is inserted each time with a new name so I was unsure
how to delete teh existing one if there is one. I was trying to have a
picture object already and then just update its URL property but don't know
how to do this. Can you help?


"Charlotte E." wrote:

Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before inserting a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse ...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the URL
image of
the product. Using the above code, it displays the URL image which is
great.
However, when the product code is changes again, it just inserts another
picture rather than update the existing one. How can I have an object set
to
the URL reference so that it can updated everytime the product code is
changed.







Charlotte E.

Update A Url Image
 
Sorry, I'm a little slow today :-)


If you don't have any other pictures, figures or charts on the spreadsheet,
the easiest way is just to put...

ActiveSheet.DrawingObjects.Delete

....before inserting the picture, so your you have these lines in your code:

ActiveSheet.DrawingObjects.Delete
ActiveSheet.Pictures.Insert(URL).Select


BR,


"SEAN DI''''ANNO" skrev i en
meddelelse ...

..Which is my problem Charlotte. if the product No is changed several
times, a new picture is inserted each time with a new name so I was unsure
how to delete teh existing one if there is one. I was trying to have a
picture object already and then just update its URL property but don't
know
how to do this. Can you help?


"Charlotte E." wrote:

Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before inserting
a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse ...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the URL
image of
the product. Using the above code, it displays the URL image which is
great.
However, when the product code is changes again, it just inserts
another
picture rather than update the existing one. How can I have an object
set
to
the URL reference so that it can updated everytime the product code is
changed.








SEAN DI''''ANNO

Update A Url Image
 
Thats great Charlotte and answers my original question. Just one more
question if I may. How do I insert the picture object in a specific position?

"Charlotte E." wrote:

Sorry, I'm a little slow today :-)


If you don't have any other pictures, figures or charts on the spreadsheet,
the easiest way is just to put...

ActiveSheet.DrawingObjects.Delete

....before inserting the picture, so your you have these lines in your code:

ActiveSheet.DrawingObjects.Delete
ActiveSheet.Pictures.Insert(URL).Select


BR,


"SEAN DI''''ANNO" skrev i en
meddelelse ...

..Which is my problem Charlotte. if the product No is changed several
times, a new picture is inserted each time with a new name so I was unsure
how to delete teh existing one if there is one. I was trying to have a
picture object already and then just update its URL property but don't
know
how to do this. Can you help?


"Charlotte E." wrote:

Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before inserting
a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse ...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the URL
image of
the product. Using the above code, it displays the URL image which is
great.
However, when the product code is changes again, it just inserts
another
picture rather than update the existing one. How can I have an object
set
to
the URL reference so that it can updated everytime the product code is
changed.









Charlotte E.

Update A Url Image
 
How do I insert the picture object in a specific position?

Not sure what you mean?

Don't you do that with...

Range("C5").Select

...to select the picture to be inserted into cell C5?

Or, what do you mean?


CE

"SEAN DI''''ANNO" skrev i en
meddelelse ...
Thats great Charlotte and answers my original question. Just one more
question if I may. How do I insert the picture object in a specific
position?

"Charlotte E." wrote:

Sorry, I'm a little slow today :-)


If you don't have any other pictures, figures or charts on the
spreadsheet,
the easiest way is just to put...

ActiveSheet.DrawingObjects.Delete

....before inserting the picture, so your you have these lines in your
code:

ActiveSheet.DrawingObjects.Delete
ActiveSheet.Pictures.Insert(URL).Select


BR,


"SEAN DI''''ANNO" skrev i en
meddelelse ...

..Which is my problem Charlotte. if the product No is changed several
times, a new picture is inserted each time with a new name so I was
unsure
how to delete teh existing one if there is one. I was trying to have a
picture object already and then just update its URL property but don't
know
how to do this. Can you help?


"Charlotte E." wrote:

Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before
inserting
a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse
...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great
but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the
URL
image of
the product. Using the above code, it displays the URL image which
is
great.
However, when the product code is changes again, it just inserts
another
picture rather than update the existing one. How can I have an
object
set
to
the URL reference so that it can updated everytime the product code
is
changed.











SEAN DI''''ANNO

Update A Url Image
 
Thanks Charlotte...Perfect...That was my turn to be stupid.



"Charlotte E." wrote:

How do I insert the picture object in a specific position?


Not sure what you mean?

Don't you do that with...

Range("C5").Select

...to select the picture to be inserted into cell C5?

Or, what do you mean?


CE

"SEAN DI''''ANNO" skrev i en
meddelelse ...
Thats great Charlotte and answers my original question. Just one more
question if I may. How do I insert the picture object in a specific
position?

"Charlotte E." wrote:

Sorry, I'm a little slow today :-)


If you don't have any other pictures, figures or charts on the
spreadsheet,
the easiest way is just to put...

ActiveSheet.DrawingObjects.Delete

....before inserting the picture, so your you have these lines in your
code:

ActiveSheet.DrawingObjects.Delete
ActiveSheet.Pictures.Insert(URL).Select


BR,


"SEAN DI''''ANNO" skrev i en
meddelelse ...

..Which is my problem Charlotte. if the product No is changed several
times, a new picture is inserted each time with a new name so I was
unsure
how to delete teh existing one if there is one. I was trying to have a
picture object already and then just update its URL property but don't
know
how to do this. Can you help?


"Charlotte E." wrote:

Ups, didn't read your question properly at first - sorry :-)

You'll of casue has to delete the current picture first, before
inserting
a
new one...


"Charlotte E." skrev i en meddelelse
...
Insert the code in a Worksheet_Change module.

That's it ...


"SEAN DI''''ANNO" skrev i en
meddelelse
...
Dim URL As String
URL = Worksheets("Sheet1").Range("B4").Value
Range("C5").Select
ActiveSheet.Pictures.Insert(URL).Select

Morning, I found the above code on this forum and it works great
but I
wonder if it can be modifed. I have a spreadhsheet which asks for a
Product
code, when entered another cell changes (using a vlookup) be the
URL
image of
the product. Using the above code, it displays the URL image which
is
great.
However, when the product code is changes again, it just inserts
another
picture rather than update the existing one. How can I have an
object
set
to
the URL reference so that it can updated everytime the product code
is
changed.













All times are GMT +1. The time now is 12:42 PM.

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