Bilder dynamisch einfügen/aktualisierem
14.02.2021 17:03:48
Christian
ich möchte in einer Arbeitsmappe, wo ich via einer Formel dynamisch gehaltene Links zu Bildern, _ automatisch aktualisiere und die Bilder anzeigen. Das Löschen vorhandener Bilder mache ich beim Öffnen mit
ActiveWorkbook.Worksheets("test").DrawingObjects.Delete
=InsertPicFromURL("https://www.test.com/test.png")
Function InsertPicFromURL(URL As String) As String
With ActiveSheet.Pictures.Insert(URL)
.Top = Application.Caller.Top + 1
.Left = Application.Caller.Left + 1
.Height = Application.Caller.Height - 2
End With
InsertPicFromURL = ""
End Function
Und kann ich die Größe des Bildes in Pixel vorgeben?
Wäre toll, wenn mir hier jemand helfen würde- Danke!
Lg,
Chris