我想在excel中实现以下功能,我不确定VBA是否足够。我曾尝试过自己编写代码一天,但可以执行我的代码。有人可以帮忙吗?
谢谢你的帮助!
答案 0 :(得分:0)
Sub InsertIcon()'find icon and insert
Dim name As String ' file path of the pic
For a = 1 To 1000
name = Cells(a, 4).Value
'MsgBox (name)
Cells(a, 8).Select
ActiveSheet.Pictures.Insert(name).Select
Selection.ShapeRange.IncrementLeft 40
Selection.ShapeRange.IncrementTop 10
Next
End Sub
这是我用来解决插入问题的代码。