Question

我在SQL中有一个带有一些字段的表，其中一个字段是一个URL。我需要在excel中显示表中的所有信息，但我希望URL字段显示URL指向的图像而不是URL本身。如何在Excel中的某个URL上显示图像？

Answer 1

这是微软在VBA中为数非常简单的事情之一。

如果您想从URL插入图片，则代码为：

ActiveSheet.Pictures.Insert("http://i.imgur.com/9W8Pb1V.png").Select

这会将一张带有煎饼的兔子的图片插入到工作簿的活动表中。

Answer 2

来自JNevill's回答...... Andrew Poulsom在2012年提供了一个完整的宏，用于将给定单元格中的URL添加到下一个单元格中的图像...如果URL位于单元格A2中，则图像将放置在单元格B2中：

Sub Test()
    Dim Pic As Picture
    Application.ScreenUpdating = False
    With ActiveSheet.Range("A2")
        Set Pic = .Parent.Pictures.Insert(.Value)
        With .Offset(, 1)
            Pic.Top = .Top
            Pic.Left = .Left
            Pic.Height = .Height
            Pic.Width = .Width
        End With
    End With
    Application.ScreenUpdating = True
End Sub

从Excel中的URL获取图像

2 个答案: