How can I convert a Image URL in excel to an actual image? I'm looking to take a url in column A and show the image in column B but also only have the image be certain size?
I've tried this but kept getting an error.
"Dim url_column As Range
<code style="margin: 0px; padding: 0px; border: 0px; vertical-align: baseline; font-family: Consolas, Menlo, Monaco, 'Lucida Console', 'Liberation Mono', 'DejaVu Sans Mono', 'Bitstream Vera Sans Mono', 'Courier New', monospace, serif;">Dim image_column As RangeSet url_column = Worksheets(1).UsedRange.Columns("A")Set image_column = Worksheets(1).UsedRange.Columns("B")Dim i As LongFor i = 1 To url_column.Cells.Count With image_column.Worksheet.Pictures.Insert(url_column.Cells(i).Value) .Left = image_column.Cells(i).Left .Top = image_column.Cells(i).Top image_column.Cells(i).EntireRow.RowHeight = .Height End WithNext"</code></pre>
I've tried this but kept getting an error.
"Dim url_column As Range
<code style="margin: 0px; padding: 0px; border: 0px; vertical-align: baseline; font-family: Consolas, Menlo, Monaco, 'Lucida Console', 'Liberation Mono', 'DejaVu Sans Mono', 'Bitstream Vera Sans Mono', 'Courier New', monospace, serif;">Dim image_column As RangeSet url_column = Worksheets(1).UsedRange.Columns("A")Set image_column = Worksheets(1).UsedRange.Columns("B")Dim i As LongFor i = 1 To url_column.Cells.Count With image_column.Worksheet.Pictures.Insert(url_column.Cells(i).Value) .Left = image_column.Cells(i).Left .Top = image_column.Cells(i).Top image_column.Cells(i).EntireRow.RowHeight = .Height End WithNext"</code></pre>