excel如何在多个表格中的批量插入图片

2024-11-06 19:58:14
推荐回答(2个)
回答(1):

用VB代码解决,代码如下:
Sub 批量导入相片()
Dim i, myPath$
myPath = ThisWorkbook.Path & "\" '获取当前文件的路径
For i = 2 To 11
Range("C" & i).Select
ActiveSheet.Pictures.Insert(myPath & Range("A" & i) & ".jpg").Select
'在选中的位置插入图片郑桐誉
'myPath 相位的路径
'Range("A" & i) 相片的文件喊段名,如果相片用B列的姓名命名也可以的
'要有轮饥相片路径+名称+后缀
Next i
End Sub