【excel教程】Excel单元格批量插入图片批注，VBA法一秒搞定

哈喽，大家好。上一篇文章跟大家介绍的是excel单元格如何手动插入图片批注。但是在表格产品比较多，想要全部插入图片批注的情况下，手动一个个插入的方法就不可取了。我们说了，只要思想不滑坡 办法总比困难多。这时，我们就要考虑更高效的办法，比如：批量插入图片批注。关键如何实现？用VBA代码就可以实现

这就是今天我要跟大家分享的主题：excel用VBA代码实现单元格批量插入图片批注。

具体操作方法，如下：

一、准备产品图片

1、先准备好要插入单元格批注的产品图片，将其放在同一个文件夹下，并确保图片名称和表格中的产品名称一样对应；

2、将存放产品图片的文件夹放在跟准备插入批注的excel文件同一目录下面，如下：

二、添加VBA代码

1、打开excel文件，右键工作表标签—【查看代码】；

2、在打开的VBA窗口中，输入代码，如下图，然后关闭VBA窗口。

附上批量插入图片批注的代码：

Sub 批量添加图片批注()

    For Each cell In Selection  '循环要插入批注的单元格

    pics = ThisWorkbook.Path & "\产品图片\" & cell.Value & ".jpg"  '图片存放地址

    cell.ClearComments  '先清空批注

    With cell.AddComment  '为区域添加批注

    On Error Resume Next

   .Shape.Fill.UserPicture picturefile:=pics  '插入图片

   .Shape.Height = 50  '设置图片高度

   .Shape.Width = 100  '设置图片宽度

    End With

    Next cell

End Sub

三、运行宏

1、鼠标选择要插入批注的所有单元格，点击【开发工具】的【宏】按钮；

2、在弹出的的【宏】窗口中，点击【执行】，如下：

这时，可以看到，表格里的产品都插入了图片批注。

强调说明：

1、要插入批注的图片名称一定要与表格内的产品名称保持一致，否则匹配不到。

2、放图片的文件夹一定要与表格放在同一个目录下。

3、Excel文件要启用宏，才能运行。有些默认设置，宏没有启用，可以按照以下方法启用：

【文件】—【选项】—【信任中心】—【信任中心设置】—【宏设置】—【启用所有宏】。

4、如果excel菜单没有【开发工具】，需要先设置，方法如下：【文件】—【选项】—【自定义功能区】，将右侧的【开发工具】选项打勾，就可以了。