如何将图片从Internet插入VBA Excel Userform

Question

我找到了一些VB代码here，但我需要它用于VBA。在阅读完这段代码之后，我尝试了解这个code，但仍然试图弄明白。此外，其他人在显示here之前遇到此问题，但没有明确的解决方案。

我正在使用的代码：

Sub Image1Insert()
    Application.ScreenUpdating = False
    Dim strPath As String
    strPath = "https://www.gravatar.com/avatar/fbd7dcb2d47ddcd7e6a799bde3ec0ef6?s=48&d=identicon&r=PG&f=1"
    UserForm1.Image1.Picture = LoadPicture(strPath)
End Sub

UserForm1.Image1.Picture = LoadPicture(strPath)

或UserForm1.Image1.Picture = ActiveSheet.Pictures.Insert(strPath)

既没有工作，也有想法。提前谢谢！