可通过四种方法在Excel中批量插入图片:一、用HYPERLINK公式生成路径后选择性粘贴为图片;二、用Power Query导入并显示缩略图;三、用VBA宏自动插入并定位;四、用Kutools等第三方插件图形化操作。

如果您需要在Excel工作表中为多行数据快速添加对应图片,但手动逐个插入效率低下,则可以通过内置功能或辅助工具实现批量操作。以下是解决此问题的步骤:
一、使用插入对象功能批量插入图片
该方法适用于图片文件名与单元格内容(如编号、产品代码)严格一致且存放在同一文件夹中,通过公式生成超链接路径后插入图片对象。
1、确保所有图片保存在同一文件夹内,且文件名(不含扩展名)与Excel中某列(例如A列)的值完全相同。
2、在B1单元格输入公式:=HYPERLINK("D:\图片文件夹\"&A1&".jpg","点击查看"),将"D:\图片文件夹\"替换为实际图片所在路径。
3、向下填充该公式至所有对应行,生成可点击的图片路径链接。
4、选中B列含公式的全部单元格,按Ctrl+C复制,再右键选择“选择性粘贴”→“图片(增强型图元文件)”,完成批量转图。
二、利用Power Query导入图片路径并显示缩略图
该方法适用于Excel 365或Excel 2019及以上版本,借助Power Query读取文件夹内图片列表,并关联原始数据生成可刷新的图片引用。
1、在Excel中点击“数据”选项卡→“获取数据”→“从文件”→“从文件夹”,浏览并选择存放图片的文件夹。
2、在导航器中勾选“Content”列,点击“转换数据”,进入Power Query编辑器。
3、添加自定义列,输入公式:=Image.FromBinary([Content]),列名为“图片”。
4、关闭并上载查询结果到工作表,再通过VLOOKUP或XLOOKUP将“图片”列匹配到主数据对应行。
三、使用VBA宏自动插入指定路径图片
该方法可精准控制插入位置、尺寸及对齐方式,适合固定列结构且需反复执行的场景,运行前需启用宏功能。
1、按Alt+F11打开VBA编辑器,插入新模块,粘贴以下代码:
Sub BatchInsertPictures()
Dim ws As Worksheet, rng As Range, cell As Range
Dim picPath As String, pic As Picture
Set ws = ActiveSheet: Set rng = ws.Range("A2:A100")
For Each cell In rng
If cell.Value "" Then
诊断并修复涉及公式、命名范围、Power Query 刷新、数据透视表、VBA/宏保存等问题的 Microsoft Excel XLSX 工作簿
picPath = "D:\图片文件夹\" & cell.Value & ".png"
If Dir(picPath) "" Then
Set pic = ws.Pictures.Insert(picPath)
With pic
.Top = cell.Offset(0, 1).Top
.Left = cell.Offset(0, 1).Left
.Width = 80: .Height = 60
End With
End If
End If
Next cell
End Sub
2、修改代码中"D:\图片文件夹\"为实际路径,确认图片扩展名(.png/.jpg)与文件一致。
3、返回Excel,按Alt+F8运行宏,图片将自动插入至B列对应行位置。
四、借助第三方加载项(如Kutools for Excel)
该方法无需编写代码,界面化操作直观,适合不熟悉VBA或Power Query的用户,需提前安装兼容版本的插件。
1、安装Kutools for Excel后,在Excel功能区出现“Kutools”选项卡。
2、点击“Kutools”→“插入”→“批量插入图片”。
3、在弹出窗口中设置图片文件夹路径、匹配列(如A列)、目标列(如B列)、图片宽高参数。
4、勾选“按文件名匹配单元格内容”,点击“确定”,系统自动完成全部插入与定位。

















