Question

如何在excel表中批量插入图片？

做报价表。A列是货号B列要插入与货号一致的图片，图片已经用货号命名好放在E盘文件夹“QPHOTOS”，图片格式JPG, 请问是否可以设一条公式另到图片可以按照货号自动插入excel的B列单元格？怎么操作？
从网上找了一些教程，但没搞懂。最好有视频解释或者发一个模板给我。
why No response ？

Answer 1

分数加到200分就发模版给你

我开始也碰到你这样的问题,插入图片很麻烦,之后我就自己做一个程序,很方便,想那里插入图片就那里插入图片. 

QQ号码:怎么发给你.

Answer 2

Excel怎么批量插入图片？这个视频告诉你！

Answer 3

打开D:\tree目录下的工作簿，在excel工作表中同时按下ALT和F11两个键，进入VBA编程，点击VBA编程中的菜单：“插入－模块”，把下面的代码粘贴到模块的空白区以后，返回到excel工作表，点击菜单工具－宏－宏，选择宏名kkk 运行代码。

sub kkk()
aa = ActiveWorkbook.Sheets.Count
For i = 1 To aa
Worksheets(i).Select
Worksheets(i).Range("A2").Select
Sheets(i).Range("A2").RowHeight = 60

ActiveSheet.Shapes.AddShape(msoShapeRectangle, 0, 48, 72, 60).Select
Selection.ShapeRange.Fill.Visible = msoFalse
Selection.ShapeRange.Shadow.Obscured = msoTrue
Selection.ShapeRange.Shadow.Type = msoShadow18

Selection.ShapeRange.Fill.UserPicture "d:\pic\" & Worksheets(i).Range("A1").Value & ".jpg"
Next i
end sub

每个工作表的A1单元格应输入“王二”等姓名，而且与D：\pic 目录下的图片文件对应

Answer 4

这个excel宏可以解决，我也是在一位好心的网友帮助下解决的。你可以把已经制好的表发到：670404925@QQ.com 我试着给你做一做，或许行。
附上几张照片吧。

Answer 5

已经用货号命名好放在E盘文件夹“QPHOTOS”，图片格式JPG, 请问是否可以设一条公式另到图片可以按照货号自动插入excel的B列单元格