ndsutherland
Active Member
- Joined
- Jan 30, 2015
- Messages
- 384
I'm trying to use the following code to insert images from a list of URL's
I can insert the images into comments from the URL's with code
I can use the URL's manually with Insert/Pictures
Is there a security setting I need to change? Below are a few of the URL's
<colgroup><col></colgroup><tbody>
</tbody>
Code:
Sub URLImage()
Dim i As Long, ws As Worksheet
Set ws = ActiveSheet
Application.ScreenUpdating = False
Columns("C").ColumnWidth = 15
For i = 2 To Range("A" & Rows.Count).End(xlUp).Row
Rows(i).RowHeight = Range("C" & i).Width
With Range("C" & i)
ws.Shapes.AddPicture .Value, False, True, .Left, .top, .Width, .Height
End With
Next i
Application.ScreenUpdating = True
End Sub
I can insert the images into comments from the URL's with code
I can use the URL's manually with Insert/Pictures
Is there a security setting I need to change? Below are a few of the URL's
http://shop.vhcbrands.com/22653_300px.png |
http://shop.vhcbrands.com/AW_Claire_Side_300.jpg |
http://shop.vhcbrands.com/21208_300px.png |
<colgroup><col></colgroup><tbody>
</tbody>