请问向excel中的路径转换成图片怎么处理。

时间:2021-01-09 06:46:05
我现在在excel中是一个图片的路径,我想把这个图片直接在excel中显示,并且增加进去的图片和excel的格子一样大小,请问这个需要怎么处理。谢谢

5 个解决方案

#1


有没有人帮我解决一下啊

#2


就是把excel中图片的路径转换成图片

#3


Sub Test()
    On Error Resume Next
    Dim Rng As Range
    'Rng---存放有路径的单元格,并且图片插入到此处
     Set Rng = Sheet1.Range("a1")
    With ActiveSheet.Pictures.Insert(Rng.Value)
        .ShapeRange.LockAspectRatio = msoFalse '取消纵横比例锁定
         .Left = Rng.Left
        .Width = Rng.Width
        .Top = Rng.Top
        .Height = Rng.Height
    End With
End Sub

#4


什么呀

#5


接分先!

#1


有没有人帮我解决一下啊

#2


就是把excel中图片的路径转换成图片

#3


Sub Test()
    On Error Resume Next
    Dim Rng As Range
    'Rng---存放有路径的单元格,并且图片插入到此处
     Set Rng = Sheet1.Range("a1")
    With ActiveSheet.Pictures.Insert(Rng.Value)
        .ShapeRange.LockAspectRatio = msoFalse '取消纵横比例锁定
         .Left = Rng.Left
        .Width = Rng.Width
        .Top = Rng.Top
        .Height = Rng.Height
    End With
End Sub

#4


什么呀

#5


接分先!