Ciao
Sub InsImg()
img = "https://pic.im-cdn.it/image/immagine_846278418.jpg"
ActiveSheet.Pictures.Insert(img).Select
QUI poi devi adattare l'immagine alla relativa cella.
.....
.....
End Sub
MA da quel che vedo nell'allegato, tu non hai il link (pic.im-cdn.it) dell'immagine, ma quello al sito dell'immobiliare.
Per fare un esempio, il tuo primo link:
https://www.immobiliare.it/annunci/66584665/
dovrebbe essere:
https://pic.im-cdn.it/image/763654680/m-c.jpg
che è quello che esce quando clicchi sull'immagine del sito immobiliare
saluti
[Modificato da dodo47 23/03/2020 16:55]
Domenico
Win 10 - Excel 2016